以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=110343) |
-- 作者:whyxd -- 发布时间:2017/12/1 10:58:00 -- [求助] 内部函数:frmname Dim frm As WinForm.Form = Forms.ActiveForm If frm Is Nothing Then Return 0 End If Dim frmname As String = frm.name msgbox(frmname) 窗口的 afterload 事件中 Functions.Execute("frmname") 我本意是想打开窗口时,跳出窗口名称的对话框,这样实现不了,不知怎样能实现。 |
-- 作者:有点蓝 -- 发布时间:2017/12/1 11:24:00 -- 直接 窗口的 afterload 事件中 msgbox(e.form.name)
|
-- 作者:whyxd -- 发布时间:2017/12/1 11:42:00 -- 回复:(有点蓝)直接窗口的 afterload 事件中msgbox(... 我需要调用内部函数,内部函数中有很多代码,而且很多窗口都用,这些代码执行的前提就是获取到即将打开的窗口的名字。 |
-- 作者:有点甜 -- 发布时间:2017/12/1 11:48:00 -- afterload 事件,窗口还没有显示出来, ActiveForm 的值肯定不对。
你可以写到窗口的timertick事件
http://www.foxtable.com/webhelp/scr/1301.htm
http://www.foxtable.com/webhelp/scr/1322.htm
|
-- 作者:whyxd -- 发布时间:2017/12/1 12:36:00 -- 回复:(有点甜)afterload 事件,窗口还没有显示出来... 明白了,写在了timertick事件了,暂时看运行没什么问题。 |
-- 作者:有点蓝 -- 发布时间:2017/12/1 14:57:00 -- 把窗口名称,或者窗口本身作为参数值传入不就行了 窗口的 afterload 事件中 Functions.Execute("frmname",e.form.name) |
-- 作者:whyxd -- 发布时间:2017/12/5 18:17:00 -- 回复:(有点蓝)把窗口名称,或者窗口本身作为参数值... 嗯,多谢。 |