VB比较大小的问题！！

这么做有啥问题？
我用了之后全部对话框清空……

Private Sub Command1_Click()
Text1.Text = a

Text2.Text = b
If a > b Then
Text3.Text = a
Else
Text3.Text = b
End If
End Sub

是比较Text1和Text2吧？写倒了。
你的是把Text1和Text2设置为暂时为空的a和b

正确的：

Private Sub Command1_Click()
a = Text1.Text

b = Text2.Text
If a > b Then
Text3.Text = a
Else
Text3.Text = b
End If
End Sub

Private Sub Command1_Click()
Text1.Text = a

Text2.Text = b
If a > b Then
Text3.Text = a
Else
Text3.Text = b
End If
End Sub

对，字符串比较，先取第一字符比较， 第一个字符如果相同，再取第二个字符比较 ... 第n个字符如果还相同，则取第n+1个字符比较 如果第一个字符不同，则剩余的字符不用比较。 比较原则是:数字小于字母，数字间数字大小排序，字母间按字母序排大小。

再建一个命令按扭 text1.text="" text2.text="" text3.text="" 不就全部清空了吗

Private Sub Command1_Click() a = Text1.Text b = Text2.Text If a > b Then Text3.Text = a Else Text3.Text = b End If End Sub