以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]请教一个奇怪的问题!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=18285)

--  作者:gaoyong30000
--  发布时间:2012/4/8 11:42:00
--  [求助]请教一个奇怪的问题!

项目如下

 

button1的代码为 转移窗口2的整个面板控件到窗口1

 

Dim spl1 As WinForm.SplitContainer
spl1 = e.Form.Controls("SplitContainer1")
forms("窗口2").open
forms("窗口2").visible = False
Dim ymy As WinForm.Panel = Forms("窗口2").Controls("Panel1")
spl1.Panel2.AddControl(ymy)
ymy.Dock = Windows.Forms.DockStyle.fill

 

窗口2 有个table1 currentchanged事件有段代码为 

 

forms("窗口1").controls("xbutton1").enabled = Tables("窗口2_table1").current("第一列") = 1

 

现在问题是:点击了button1代码后  出错

 


图片点击可在新窗口打开查看此主题相关图片如下:1212.jpg
图片点击可在新窗口打开查看

 

但是出错后 再进去 点击右侧的表 发现currentchanged事件正常

 

不清楚什么情况 求教~~~~~

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

[此贴子已经被作者于2012-4-8 11:43:37编辑过]

--  作者:gaoyong30000
--  发布时间:2012/4/8 14:22:00
--  

已解决 

 

焦点问题

 

在窗口2加一个 e.form.controls("xbutton1").select  即可解决~