Dim a As Integer
Dim b As Integer
Dim c As String
TextBox1.Text = ""
For a = 1 To 9
c = " "
For b = 1 To a
c = c & a & " * " & b & " =" & a * b & " "
Next b
TextBox1.Text = TextBox1.Text + c + Chr(13) + Chr(10)
Next a
这个TextBox1.Text = TextBox1.Text + c + Chr(13) + Chr(10)?