使用多个ContextMenu 控件可以使用For Each
循环吗?
我想做类似下面的例子......
For Each lbl As Label In Me.Controls
'Some code here...
Next
但对于ContextMenu控件......
For Each cmenu As ContextMenu In ???
我应该使用什么代替Me.Controls
?
答案 0 :(得分:1)
如果您使用的ContextMenuStrip
类替换并添加了以前版本的SELECT
thread_id,
IF(user_read_status = 'U',"unread","read") as message_status FROM messages
GROUP BY thread_id
控件的功能,则可以使用类似的代码:
ContextMenu
您需要使用Reflection才能找到应用程序拥有的开放表单集合中的每个For Each x As Object In Me.components.Components
If TypeOf x Is ContextMenuStrip Then
MsgBox(CType(x, ContextMenuStrip).Name)
End If
Next x
。
ContextMenuStrip