Foxtable(狐表)用户栏目专家坐堂 → [求助] 双击的问题


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

主题:[求助] 双击的问题

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


加好友 发短信
等级:三尾狐 帖子:798 积分:5911 威望:0 精华:0 注册:2018/11/3 8:24:00
[求助] 双击的问题  发帖心情 Post By:2020/5/6 12:37:00 [只看该作者]

请问老师,以下在表属性的双击事件中,设置好后,双击ShippingNo可以执行后续的,但双击其它列也可执行。如何设置只能双击这个ShippingNo,双击其它的列不可执行,谢谢。



If e.Col.Name ="ShippingNo"
     e.Cancel =True
DataTables("Packinglist").LoadFilter = "ShippingNo  = '" & e.Row("ShippingNo") & "'"

DataTables("GSSInvoice").LoadFilter = "ShippingNo  = '" & e.Row("ShippingNo") & "'"

DataTables("CustomsInvoice").LoadFilter = "ShippingNo  = '" & e.Row("ShippingNo") & "'"
DataTables("Packinglist").Load()
DataTables("GSSInvoice").Load()
DataTables("CustomsInvoice").Load()
End If
Forms("Mainfrm").Open()

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


加好友 发短信
等级:超级版主 帖子:107301 积分:545766 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/6 13:51:00 [只看该作者]

……
DataTables("GSSInvoice").Load()
DataTables("CustomsInvoice").Load()
Forms("Mainfrm").Open()
End If


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


加好友 发短信
等级:三尾狐 帖子:798 积分:5911 威望:0 精华:0 注册:2018/11/3 8:24:00
  发帖心情 Post By:2020/5/6 14:02:00 [只看该作者]

老师,我把End If 移到最后了,可是双击其它列名,还是可以打开这个窗口了,可以帮忙再看一下吗 ? 谢谢。

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


加好友 发短信
等级:三尾狐 帖子:798 积分:5911 威望:0 精华:0 注册:2018/11/3 8:24:00
  发帖心情 Post By:2020/5/6 14:06:00 [只看该作者]

解决了,谢谢。

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


加好友 发短信
等级:超级版主 帖子:107301 积分:545766 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/6 14:06:00 [只看该作者]

不可能的,除非有其它代码影响了。

关闭退出项目,删除项目所在的文件夹里的bin目录,然后重启项目试试。

 回到顶部