请问：selecet case语法。

[CACACAW]

select case aaa
CASE 1
...

1、怎么从这里跳出循环？
2、结束函数

[SoHo_Andy]

select case 语句是多分支处理语句，各分支不能同时执行，
不存在跳出循环的问题

示例如下
Private Sub Command2_Click()
ShowInfo "王"
ShowInfo "李"
ShowInfo "张"
ShowInfo "刘"
End Sub
Sub ShowInfo(strName As String)
Select Case strName
Case "王"
MsgBox strName & " 先生，您好！"
Case "李"
MsgBox strName & " 先生，您好！"
Case "张"
MsgBox strName & " 先生，您好！"
Case Else
MsgBox "不接待除王、李、张之外姓氏的客人！"
End Select
End Sub

[zmrok]

后面加一个end select就可以了

[踏平扶桑]

如果强制跳转可以用goto语句

[littleantty]

别用goto,select不是循环，不存在跳出函数 agree soho_andy

[laozhaoskinny]

1，可以用“goto 行号” 语句跳出select
2，退出函数用Exit Function （或Exit Sub）


看看下面例子

新建窗体，添加2个命令按钮命名为Command1(0) 和Command1(1)


Option Explicit

Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0
GoTo QuitSelect
MsgBox "000"
Case Else
MsgBox "1"
End Select
QuitSelect:
Call abc

End Sub

Private Function abc()
MsgBox "abc"
Exit Function
MsgBox "abc 2"
End Function

[xh_cl]

不知有没有一个exit select,你试试看

[liberte]

exit sub

[evbsky]

同意SoHo_Andy(冰)
exit sub 或 function