Private Sub Command1_Click() Text1.Text = "欢迎使用Visual Basic 6.0中文版" Text1.FontSize = 20 End Sub Private Sub Command2_Click() Text1.Text = "" End Sub Private Sub Command3_Click() End End Sub