以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]全局代码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105665)

--  作者:苏州老街
--  发布时间:2017/8/23 19:29:00
--  [求助]全局代码
老师,我想让下面代码变成项目的通用代码。

Public Sub C1FlexGrid2_MouseClick(sender As Object, e As system.windows.forms.MouseEventArgs)
Forms("外部通讯表").Open
End Sub

--  作者:有点甜
--  发布时间:2017/8/23 19:54:00
--  

绑定事件?

 

addhandler Tables("表A").grid.MouseClick, addressof C1FlexGrid2_MouseClick


--  作者:苏州老街
--  发布时间:2017/8/23 20:43:00
--  
老师,“通讯录”表打开"外部通讯录表"窗口"系统"表打开“系统”窗口,不是统一打开一个窗口。

Public Sub C1FlexGrid2_MouseClick(sender As Object, e As system.windows.forms.MouseEventArgs)
Forms("外部通讯表").Open
End Sub

--  作者:有点甜
--  发布时间:2017/8/23 20:53:00
--  

Tables("表A").grid.name = "表A"

addhandler Tables("表A").grid.MouseClick, addressof C1FlexGrid2_MouseClick

 

---------------

 

Forms(sender.name).Open


--  作者:苏州老街
--  发布时间:2017/8/24 6:23:00
--  
老师,下面代码怎样理解。
Forms(sender.name).Open
--  作者:有点甜
--  发布时间:2017/8/24 9:27:00
--  
以下是引用苏州老街在2017/8/24 6:23:00的发言:
老师,下面代码怎样理解。
Forms(sender.name).Open

 

Sender就是Tables("表A").grid