vba编写程序,三个文本框,一个控制按钮,比较两个数的大小
发布网友
发布时间：2024-05-04 00:23
共1个回答
热心网友
时间：2024-06-12 01:02
If Not IsNumeric(UserForm1.TextBox1.Text) Or Not IsNumeric(UserForm1.TextBox2.Text) Then
MsgBox "不是合法字符"
Exit Sub
End If
If UserForm1.TextBox1.Text * 1 > UserForm1.TextBox2.Text * 1 Then MsgBox "第一个数值较大"
If UserForm1.TextBox1.Text * 1 < UserForm1.TextBox2.Text * 1 Then MsgBox "第二个数值较大"
If UserForm1.TextBox1.Text * 1 = UserForm1.TextBox2.Text * 1 Then MsgBox "数值相等"
End Sub
