在VB6中混合编号和未编号的行

时间:2013-07-18 15:48:14

标签: vb6 basic

我记得20世纪80年代还是个孩子,因为你不得不在BASIC编号。如今,据我所知,编号线是100%的;没有人想要或需要使用它们。直到我发现了一些我需要处理的遗留代码。每个函数的行都以10为增量编号。我的问题是,使用编号和未编号行的混合是否有任何负面影响?例如,如果我正在修改一个函数,我可以只删除该函数中的所有编号而不会有任何问题吗?如果我不需要,我真的不想尝试维护这样一个神秘的系统,但我也不认为清除整个项目的所有编号都有任何重大好处。

1 个答案:

答案 0 :(得分:3)

据我所知,VB6中的行号仅对错误处理有帮助。像这样:

Private Sub Command1_Click()

    Dim i As Long

    On Error GoTo ErrorHandler

10:     i = 20
20:     i = i / 2
30:     i = i / 0

    Exit Sub

ErrorHandler:

    MsgBox ("Error on line: " & Erl)

End Sub

运行此代码时,会显示“第30行出错”。有一个名为MZ Tools的免费工具VB6,它是VB6的插件。此工具可以添加/删除行号以及为您插入错误处理。我鼓励你去看看它。