主题：怎么判断选中的是哪个lbl控件？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目4.zip

 这种方式能用窗体的右键快捷方式吗？如果能，老师能给个代码吗？

http://www.foxtable.com/webhelp/topics/3116.htm

 都动态生成的，不会定义

lbl.ContextStrip = e.Form.Strips("快捷菜单1")

 click事件中 加粗这样写，为啥不行呢？

If TypeOf e.sender Is WinForm.Panel  Then 如果是分区控件     Dim controlname As String     If TypeOf e.sender Is WinForm.Panel Then 如果点击是panel         controlname = e.sender.name 获取panel名称     ElseIf e.sender.parent IsNot Nothing Then 如果当前点击的控件有父控件         If TypeOf e.sender.Parent Is WinForm.Panel Then 如果父控件是panel             controlname = e.sender.parent.name获取父控件名称         End If     End If     msgbox(controlname)     Vars("序号") = controlname     Dim n As Integer = Tables("桌台信息").Rows.Count     For i As Integer = 0 To n - 1遍历所有行设置对应控件的边框和颜色         Dim r As Row = Tables("桌台信息").Rows(i)         Forms("菜单").Controls(r("序号")).BorderStyle = BorderStyle.None         Forms("菜单").Controls(r("序号")).BackColor = Color.Lightgray      Next     设置对应panel控件的边框和颜色     Forms("菜单").Controls(controlname).BorderStyle = BorderStyle.FixedSingle     Forms("菜单").Controls(controlname).BackColor = Color.Azure      End If

说明点击的不是panel，是其它控件

 点哪里都没有反应

说明没有点中panel