Private Sub Command1_Click() Text1.text = "Hello,World!" Text1.FontSize = 30 Text1.ForeColor = vbBlue End Sub这样吧。
