VB 6.0: Control text size of TextBox using Scroll Bar

Visual Basic program to control fontsize of text of text box using scroll bar 

Disign :

Code:

//for more program please visit www.programtubenotes.blogspot.in 

Private Sub Form_Load()
VScroll1.Min = 1
VScroll1.Max = 200
Text1.Text = "Program Tube"
End Sub

Private Sub VScroll1_Change()
Text1.FontSize = VScroll1.Value
End Sub

Output:

 

Related Videos: