Private Sub Hello_Click() Text1.Text = "Hello" Label1.Caption = "Hello" Form1.Caption = "Hello End Sub