例5-1输入三个数,输出其中最大值。 Private Sub Command1_Click Dim al, b cl, max! a= nputBoⅹ(“请输入第一个数" b= inpuTbox(请输入第二个数") C= InputBoX请输入第三个数") max= a If b> max Then max=b If c> max then max=c Printa;"":b;"";c;"中最大值是:"mQ End sub 例5-2编程求符号函数sgn(X)的值。P102例5－1 输入三个数，输出其中最大值。 Private Sub Command1_Click() Dim a!, b!, c!, max! a = InputBox("请输入第一个数") b = InputBox("请输入第二个数") c = InputBox("请输入第三个数") max = a If b > max Then max = b If c > max Then max = c Print a; ","; b; ","; c; "中最大值是："; max End Sub 例5－2 编程求符号函数sign(x)的值。P102