Font

Question

Como que faço para alterar uma font de um objeto em tempo de execução
Preciso mudar a cor da font, colocar italico, sublinhado
Estou tendo dificuldade na class Font

Dim Letra as New Font().... 'O problema esta aqui, não estou conseguindo passar todos os parametros.

Answer 1

Venildo

tu pode declarar assim:    Dim fonte As New Font(ControleQtuvaiMudarAFonte.Font.FontFamily, 12, FontStyle.Bold <ou strikeout, ou...>)

Dá uma olhada neste link:
http://msdn.microsoft.com/pt-br/library/system.drawing.font.aspx

Answer 2

Venildo,

Para vários estilos:

            Dim fonte As New Font(LabelX.Font.FontFamily, 12, FontStyle.Strikeout Or FontStyle.Italic Or FontStyle.Bold Or FontStyle.Underline)

            LabelX.Font = fonte

Falou