一·实验目的
实现三个数的大小比较,比较出最大的一个数。
二·实验内容
在对象窗口画出一个command按钮,点击command按钮,输入以下vb程序语言:
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim max As Integer
Dim c As Integer
a = 45
b = 78
c = 123
If a > b Then
max = a
Else
max = b
End If
If c > max Then
max = c
End If
Print max
End Sub
三·心得体会
三个数的比较大小在两个数的大小程序上加大了难度,但是也还是比较简单,看来打好基础是非常重要的。