请问在VB6里面如何快速注释多行代码啊？

[0深水蓝0]

在VB6里面我想一次过吧多行代码变成注释，在程序运行的时候不执行这些代码，但又不想这么快删掉这些代码。请问有什么好办法快速地把这些代码一次过注释掉呢？

如果每一行一行地在前面加上单引号“'”，那太麻烦了。

最好有什么快捷键之类的呢？

谢谢。

[zdingyun]

似乎没有LZ想要的功能.建议LZ可以采用其它方法,如添加一个新按钮,将想修改的代码复制到新按钮的Click事件中备份保留.从而可以大胆修改你的代码.

[专注VB编程开发20年]

在EXCEL中先把第一格输入2个''，然后再复制这一格，粘他50行，就变成了注释前面的字符"'"
然后再把代码粘到EXCEL第二列，再全选粘加VB就OK了

Private Sub Form_Load()
Dim s
s = Clipboard.GetText
MsgBox "a"
Dim s2
s2 = Clipboard.GetText
MsgBox s = s2
End Sub
'   Private Sub Form_Load()
'   Dim s
'   s = Clipboard.GetText
'   MsgBox "a"
'   Dim s2
'   s2 = Clipboard.GetText
'   MsgBox s = s2
'   End Sub

[专注VB编程开发20年]

这个直接做个小软件替换一下也可以

Private Sub Form_Load()
Dim S As String
'S = Clipboard.GetText
S=TEXT1.TEXT
S = VB代码行变注释(S)

Clipboard.Clear
Clipboard.SetText S
MsgBox S
End Sub

Function VB代码行变注释(S As String) As String
VB代码行变注释 = "'--暂不用的代码 " & Replace(S, vbCrLf, vbCrLf & "'--暂不用的代码 ")
End Function

[VBToy]

先选定要注释的多行，然后点击工具栏中的“Comment Block”按钮即可。反之亦然。

[贝隆]

[Quote=引用 4 楼 vbtoy 的回复:]
先选定要注释的多行，然后点击工具栏中的“Comment Block”按钮即可。反之亦然。
[/Quote]
没有比着更快的了

[无·法]

竟然那么多人不知道vb的ide自带的注释方法，选定要注释的多行或一行代码然后直接点那个按钮就行了，同样选择需要取消注释的行然后点击后面一个按钮就快速去除注释了。

[zdingyun]

[zdingyun]

貌似我的版本8176没此项功能!

[绿洲]

话说这个工具栏默认是关闭的，需要手动打开才可以啊。

[zdingyun]

[Quote=引用 9 楼 oasis0535 的回复:]
话说这个工具栏默认是关闭的，需要手动打开才可以啊。
[/Quote]
在哪打开?

[ningweidong]

工具栏上有多行注释啊

[zdingyun]

我在工具栏中咋也找不到:

[zdingyun]

终于找到该项工具如何加载了,又学到一招了.

[zdingyun]

[Quote=引用 13 楼 zdingyun 的回复:]
终于找到该项工具如何加载了,又学到一招了.
[/Quote]
是在视图菜单下的工具栏选项下对编辑打勾就行了.

[eicon]

这问题。

[高手都到碗里来]

竟然这么多人不熟悉这个？看来仔细研究过vb6菜单还是有用的

[0深水蓝0]

原来这个工具在“视图”——》“工具栏”——》“编辑”里面。

学习了。

[无·法]

[Quote=引用 14 楼 zdingyun 的回复:]

引用 13 楼 zdingyun 的回复:
终于找到该项工具如何加载了,又学到一招了.

是在视图菜单下的工具栏选项下对编辑打勾就行了.
[/Quote]直接右击工具栏，然后勾选编辑也行的。

[worldy]

打开工具栏编辑

代码窗口中选择一片你要注销掉的行
工具栏的注释按键点一下即可

[嗷嗷叫的老马]

晕倒,居然还有这么多人不知道这功能呀?

看样子微软推新开发工具是不是太快了...........