Foxtable(狐表)用户栏目专家坐堂 → 1227版本窗口表复选框的事件错误


  共有13148人关注过本帖树形打印复制链接

主题:1227版本窗口表复选框的事件错误

帅哥哟,离线,有人找我吗?
kylin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 F6
等级:狐精 帖子:3036 积分:19223 威望:0 精华:2 注册:2008/9/1 7:50:00
1227版本窗口表复选框的事件错误  发帖心情 Post By:2009/12/29 10:08:00 [只看该作者]

在窗口表中的AfterCheckRow事件中写入:这个表是SQLQuery类型的


e.Table.ClearCheckedRows
e.row.Checked = True
dataTables("htmx").LoadFilter = "bh is null"
dataTables("htmx").Load
dataTables("tjfx").LoadFilter = "bh is null"
dataTables("tjfx").Load

Forms("窗口2").Controls("Panel2").Visible = False
Forms("窗口2").Controls("Table6").Visible = False

dataTables("clmx").LoadFilter = "lb is null"
dataTables("clmx").Load
Tables("窗口2_Table4").DataSource = DataTables("clmx")
Tables("cbjs").Filter = "zlh = '" & e.Row("指令号") & "'"

Forms("窗口2").Controls("RadioButton1").Checked = False
Forms("窗口2").Controls("RadioButton2").Checked = False
Forms("窗口2").Controls("RadioButton3").Checked = False
Forms("窗口2").Controls("TextBox6").Value = nothing
Forms("窗口2").Controls("TextBox7").Value = nothing
Forms("窗口2").Controls("TextBox8").Value = nothing

Forms("窗口2").Controls("RadioButton4").Checked = False
Forms("窗口2").Controls("RadioButton5").Checked = False
Forms("窗口2").Controls("RadioButton6").Checked = False
Forms("窗口2").Controls("RadioButton7").Checked = False
Forms("窗口2").Controls("RadioButton8").Checked = False

Forms("窗口2").Controls("TextBox1").Value = nothing
Forms("窗口2").Controls("TextBox2").Value = nothing
Forms("窗口2").Controls("TextBox3").Value = nothing
Forms("窗口2").Controls("TextBox4").Value = nothing
Forms("窗口2").Controls("TextBox5").Value = nothing

在之前版本是可以运行正常的

在这个版本中一点击复选框,就自动全部退出了
目前暂时改在CurrentChanged事件中凑合用一下

请老六看看,问题出在哪里,谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/12/29 10:10:00 [只看该作者]

呵呵,做个例子给我,代码我不好分析啊

[此贴子已经被作者于2009-12-29 10:10:01编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
kylin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 F6
等级:狐精 帖子:3036 积分:19223 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2009/12/29 14:27:00 [只看该作者]


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


简单的例子,点击一下复选框就会自动退出

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/12/29 15:40:00 [只看该作者]

收到,我会处理好的

 回到顶部