2位数字的比较,找出最大值。

来源:互联网 发布:oracle的sql语句 编辑:程序博客网 时间:2024/05/18 03:03

Private Sub Command1_Click()

 

Dim m As Integer

 

Dim n As Integer

 

m = InputBox("输入数字")

 

n = InputBox("输入数字")

 

If m > n Then

 

Print m

 

Else

 

Print n

 

End If

 

原创粉丝点击