比较三个数的大小

一·实验目的

    实现三个数的大小比较，比较出最大的一个数。

二·实验内容

   在对象窗口画出一个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

 

三·心得体会

 三个数的比较大小在两个数的大小程序上加大了难度，但是也还是比较简单，看来打好基础是非常重要的。