用vb输入三个数,输出最大数、最小数

问题描述:

用vb输入三个数,输出最大数、最小数

Private Sub Form_Activate()Dim a As IntegerDim b As IntegerDim c As Integera = Val(InputBox("请输入第一个数"))b = Val(InputBox("请输入第二个数"))c = Val(InputBox("请输入第三个数"))If a >= b And a >= c...