Question

用vb编程：任意输入3个数，输出其中最大值，

Answer 1

Private Sub Command1_Click()
a = Val(InputBox("请输入第一个数"))
b = Val(InputBox("请输入第二个数"))
Print "你输入的数分别是："; a; "和"; b
Print "其中较大数是：";
If a > b Then
Print a
Else
Print b
End If
End Sub

Answer 2

public function max(a as integer,b as integer,c as integer) as integer
max=iif(a>iif(b>c,b,c),a,iif(b>c,b,c))
end function

使用VB6.0已经测试通过。

Answer 3

a=XX
b=YY
c=MM
if a>b then
max=a
else
max=b
end if
if c>max then
max=c
end if

Answer 4

vb 里面有个求最大函数 max(),先比较两个数，然后把这个结果与第三个数再做一次求最大数不就可以了吗