VB的:输入三个数X、Y、Z,按从小到大的顺序输出这三个数

Private Sub Command1_Click()
a = Text1.Text: b = Text2.Text: c = Text3.Text
If a > b Then m = a: n = b
Else: m = b: n = a
End If
If n > c Then
Label1.Caption = m > n > c
ElseIf m < c Then
Label1.Caption = c > m > n
Else
Label1.Caption = m > c > n
End If

为什么提示我说第一个else没有IF啊啊???不是有么。。
哪位指点迷津一下~~谢谢~~!!

第1个回答  2011-06-08
THEN 后面直接换行!(或加冒号 : )
你的程序太乱!题目中是X、Y、Z,程序中是a、b、c,一会儿又有m、n
这样写:
Private Sub Command1_Click()
X = Text1.Text: Y = Text2.Text: Z = Text3.Text
If X>Y Then m = X : X = Y : Y = m
If X>Z Then m = X : X = Z : Z = m
If Y>Z Then m = Y : Y = Z : Z = m
Label1.Caption = X & " < " & Y & " < " Z
End Sub本回答被提问者采纳
第2个回答  2011-06-08
要不then 和else 都在一行上,叫行if
要不then 和else后内容都换行,叫块if
If a > b Then
m = a: n = b
Else
m = b: n = a
End If

If n > c Then
Label1.Caption = m > n > c
ElseIf m < c Then
Label1.Caption = c > m > n
Else
Label1.Caption = m > c > n
End If