vb比较两个数的大小

来源:互联网 发布:淘宝如何评价买家 编辑:程序博客网 时间:2024/04/30 15:52

代码如下:
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
If a > b Then
Label3.Caption = a
Else
Label3.Caption = b
End If


End Sub

心得:学会了把text的数应用到函数中