你的第一区 的Private Sub CommandButton1_Click()a = Val(TextBox1.Text)b = Val(TextBox2.Text)c = Val(TextBox3.Text)Dim result As Stringresult = ""If a > b Then
If b > c Then
result = result & a & "," & b & "," & c///////////////这里少了 end if
If a > c Then
result = result & a & "," & c & ","...
