主题：[求助]如何遍历有代码的事件名称

如何遍历表---有代码的事件名称？
如何遍历窗口---有代码的事件名称？
如何遍历窗口控件---有代码的事件名称？

 那么菜单   “杂项”里面的----输出代码按钮----又是如何作到的？

 因为项目表太多，还有很多窗口，我想看一下结构，大检查一遍，所以想把这些遍历出来

 嗯嗯

Dim ss As new StringBuilder   '定义长字符串
ss.Appendline("项目事件")
With e.Form.Controls("TextBox1")
    For i As Integer = 1 To .Lines.Length - 2
        If .Lines(i-1) = "" AndAlso .Lines(i+1) = "" AndAlso .Lines(i).Contains(" ") = False Then
            ss.Appendline(.Lines(i))    '换行添加
        End If
    Next
End With
e.Form.Controls("TextBox2").text = ss.Tostring   '显示