以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  有没有返回控件所在的窗体名  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50161)

--  作者:ndxfke
--  发布时间:2014/4/30 13:37:00
--  有没有返回控件所在的窗体名

需求,返回控件所在的窗体。

 

我知道控件有.个parent 属性来返回所在容器。但在容器层次未知的情况下,怎样能便捷获取到所有的窗体名呢?

 

 


--  作者:lsy
--  发布时间:2014/4/30 13:58:00
--  
MessageBox.Show(e.Sender.Form.Name)
--  作者:有点甜
--  发布时间:2014/4/30 14:04:00
--  
 是2楼的意思?直接说你要达到的目的吧
--  作者:ndxfke
--  发布时间:2014/4/30 14:04:00
--  
谢谢..
--  作者:lsy
--  发布时间:2014/4/30 14:15:00
--  

返回所有层级:

 

Dim p As Object = e.Sender
Do
    MessageBox.Show(p.Name)
    p = p.Parent
Loop Until p.Parent Is Nothing