Schriftattribute per Code in einer Textbox setzen (VB.NET) VB-Version:  VB5, VB6
	Views:  350

Um einer Textbox andere Schriftattribute per Code zuzuweisen, ging man beiVB6 z. B. so vor:

Private Sub Form_Load()
  ' Schriftart einstellen    
  Text1.FontName = "Arial"
  ' Schriftgröße einstellen
  Text1.FontSize = 18
  ' Schriftstil einstellen
  Text1.FontItalic = True
  ' Schriftfarbe einstellen
  Text1.ForeColor = vbRed
End Sub

In VB.NET geht das jetzt etwas anders:

Private Sub Form1_Load(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles MyBase.Load
 
  ' Schriftart, -größe und -stil einstellen
  TextBox1.Font = New Font("Arial", 18, FontStyle.Italic)
  ' Schriftfarbe einstellen
  TextBox1.ForeColor = System.Drawing.Color.Red
End Sub