Text Property Example

This example illustrates the Text property. To try this example, paste the code into the Declarations section of a form that contains three TextBox controls and a CommandButton control, and then press F5 and enter text in Text1.

Private Sub Text1_Change ()
   Text2.Text = LCase(Text1.Text)   ' Display text as lowercase.
   Text3.Text = UCase(Text1.Text)   ' Display text as uppercase.
End Sub

Private Sub Command1_Click ()   ' Delete text.
   Text1.Text = ""
End Sub