如何在VB文本框里输出变量的内容谢谢

Question

如题

Answer 1

对Text1.Text属性赋值：

Dim a As Integer
Private Sub Command1_Click()
a = a + 1
Text1.Text = Text1.Text & "这是第" & a & "次点击" & vbCrLf
Text1.SelStart = Len(Text1.Text)
End Sub

用 & 连接变量和字符串

补充：你要把你的text1的multiline属性设置为true

Answer 2

Private Sub Command1_Click()
Static a As Integer
a = a + 1
Text1.Text = "这里第" & a & "次单击"
End Sub