Question

VB出现编译错误：参数不可选，求最大值，新手求指点

Option Compare DatabasePublic Sub Example()
Dim a, b, c As Integer
x = InputBox
y = InputBox
z = InputBox
If x > y Then
If y > z Then
a = x
b = y
c = z
End If
If z > x Then
a = z
b = x
c = y
End If
Else: a = x
b = z
c = y
End If

If x < y Then If y < z Then
a = z
b = y
c = x
End If
If z < x Then
a = x
b = y
c = z
End If
Else: a = y
b = z
c = x
End If
Print a, b, c
End Sub
不好意思一着急写错了！！排序！！！

Answer 1

你这是要干什么，混乱的逻辑

追问

我确实乱了……各种不明白……

追答

三个数排序简单。最笨的方法，你把可能的情况都一一列出来，用if elseif 实现就好了，一种情况就是一个判断条件

Answer 2

你这是求最大值呀，还是排序啊

追问

三个数排序……

追答

试了一下，如果用if语句来做的话，好像会很复杂的

Answer 3

x,y,z,也是要定义的