UC知道简单的VB6.0的问题
来源：百度知道 编辑：UC知道 时间：2024/05/31 06:26:57
On Error GoTo Err_abc
GoTo Go_s
Err_abc:
GoTo Quit
Go_s:
Dim i As Long: Dim j As Long: Dim k As Long
Dim m As Long: Dim n As Long
Dim X As Double: Dim Y As Double: Dim z As Double
Dim u As Double: Dim v As Double: Dim w As Double
Dim o As Double: Dim p As Double: Dim q As Double
Dim zi As String: Dim zi_x As String: Dim zi_y As String
Dim t As Long
Dim zi_a As String: Dim zi_b As String: Dim zi_C As String: Dim zi_d As String
If Combo23.ListCount = 0 Then GoTo Quit
If Combo23.ListIndex < 0 Then GoTo Quit
请看看这行代码！Dim i As Long: Dim j As Long: Dim k As Long 这一句话是什么意思？中间为什么有（：)这个符号啊？还有GoTo Quit这个那个Quit是什么意思？一没有定义二又不是系统单词！
请大家帮忙回答一下！
:表示其实是两行，quit是一个代码的标签。
不是很明白啊！能说详细一点吗？谢谢！
GoTo Go_s
Err_abc:
GoTo Quit
Go_s:
Dim i As Long: Dim j As Long: Dim k As Long
Dim m As Long: Dim n As Long
Dim X As Double: Dim Y As Double: Dim z As Double
Dim u As Double: Dim v As Double: Dim w As Double
Dim o As Double: Dim p As Double: Dim q As Double
Dim zi As String: Dim zi_x As String: Dim zi_y As String
Dim t As Long
Dim zi_a As String: Dim zi_b As String: Dim zi_C As String: Dim zi_d As String
If Combo23.ListCount = 0 Then GoTo Quit
If Combo23.ListIndex < 0 Then GoTo Quit
请看看这行代码！Dim i As Long: Dim j As Long: Dim k As Long 这一句话是什么意思？中间为什么有（：)这个符号啊？还有GoTo Quit这个那个Quit是什么意思？一没有定义二又不是系统单词！
请大家帮忙回答一下！
:表示其实是两行，quit是一个代码的标签。
不是很明白啊！能说详细一点吗？谢谢！
Dim i As Long: Dim j As Long: Dim k As Long 表示其实是三行:
Dim i As Long
Dim j As Long
Dim k As Long
这三行定义了3个变量。
quit是一个代码的标签。在程序要跳转的时候要让程序跳到哪儿？这就是要跳到的地方的标记。
Dim i As Long: Dim j As Long: Dim k As Long 这一行定义了i,j,k三个变量为长整型.":"表示两行的代码写作一行,GoTo Quit是设置错误陷阱,Quit只是这个陷阱的名称.
Dim i As Long: Dim j As Long: Dim k As Long 这一行定义了i,j,k三个变量为长整型.":"表示两行的代码写作一行,在中间起间隔的作用。
那个GOTO语句现代编程里面很不提倡用，像上面的短程序还可以。但是较长的程序中用goto会使你的程序变得杂乱无章，我们称之为“耗子窝程序”。应该避免使用。