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

Question

在VB6里面我想一次过吧多行代码变成注释，在程序运行的时候不执行这些代码，但又不想这么快删掉这些代码。请问有什么好办法快速地把这些代码一次过注释掉呢？如果每一行一行地在前面加上单引号“'”，那太麻烦了。最好有什么快捷键之类的呢？谢谢。

Answer 1

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

Answer 2

在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

Answer 3

这个直接做个小软件替换一下也可以
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 SubFunction VB代码行变注释(S As String) As String
VB代码行变注释 = "'--暂不用的代码 " & Replace(S, vbCrLf, vbCrLf & "'--暂不用的代码 ")
End Function

Answer 4

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

Answer 5

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