项目事件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 项目事件

共有2373人关注过本帖树形打印复制链接主题：项目事件

gcc123

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：407 积分：3087 威望：0 精华：0 注册：2014/6/10 11:31:00

项目事件

Post By：2014/9/1 9:07:00 [显示全部帖子]

项目中有很多表，在每个表窗口中设置一个打印列按钮，按钮的代码能不能加入到项目事件或全局表事件当中呢？省的每个表都得重复加按钮代码

表中代码如下：

Dim l As Integer = Tables("鲁H78062").LeftCol
Dim r As Integer = Tables("鲁H78062").RightCol

For Each c As Col In Tables("鲁H78062").cols
    If c.index < l OrElse c.Index > r Then
        c.Visible=False
    End If
Next

Tables("鲁H78062").Print(True,False)

For Each c As Col In Tables("鲁H78062").cols
c.Visible=True
Next

gcc123

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：407 积分：3087 威望：0 精华：0 注册：2014/6/10 11:31:00

Post By：2014/9/1 12:16:00 [显示全部帖子]

谢谢

gcc123

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：407 积分：3087 威望：0 精华：0 注册：2014/6/10 11:31:00

Post By：2014/9/1 12:17:00 [显示全部帖子]

谢谢

主题：项目事件