两个数中显示最大的程序:1.打开程序.2,添加两个text一个command和一个label.3编写程序.
程序如下:
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
程序如下:
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
4.运行程序.5.检查错误.6再次运行.7重复操作直到成功.8保存9退出.10总结