在窗体上插入两个标签,两个文本框,一个按钮。输入代码:
Private Sub Command1_Click()
Dima As Integer
Dimb As Integer
a =Text1.Text
b =Text2.Text
If a > b Then
Print a
Else
Print b
End If
End Sub
在窗体上插入两个标签,两个文本框,一个按钮。输入代码:
Private Sub Command1_Click()
Dima As Integer
Dimb As Integer
a =Text1.Text
b =Text2.Text
If a > b Then
Print a
Else
Print b
End If
End Sub