Private Sub Command1_Click()
Text1.Text = "你好嗎?"
End Sub

Private Sub Command2_Click()
Text1.Text = "很好,謝謝您!"
End Sub