Change the font of a textbox by selecting all avalible fonts in a list box

Robin Hickmott (5 Submissions) Custom Controls/Forms/Menus Visual Basic 5.0 Unknown Difficulty Fri 28^th January 2000 Mon 8^th February 2021

Rate Change the font of a textbox by selecting all avalible fonts in a list box

(2(2 Vote))


For Font = 1 To Screen.FontCount
    Font_List.AddItem Screen.Fonts(Font)
Next I
End Sub

Private Sub List1_Click()
Text1.Font = List1.Text
End Sub

Change the font of a textbox by selecting all avalible fonts in a list box Comments

No comments yet — be the first to post one!