Foxtable(狐表) → 用户栏目 → 专家坐堂 → 几个简单问题


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

主题：几个简单问题
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		几个简单问题  发帖心情 Post By：2017/1/14 10:27:00 [显示全部帖子]

请问老师：

            1    ctrl+shift+f11和f12键在运行程序是失效，不能返回系统，请问如何解决。
            2    如何不显示或重新显示表头的表A、表B、表C（就是运行程序是不显示那几个表，只有程序界面）。

谢谢！
 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/14 11:07:00 [显示全部帖子]

谢谢指点。运行程序时不显示那几个表（表A、表B、表C），只有程序界面，怎么做？

 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/14 12:35:00 [显示全部帖子]

会做了，谢谢。

 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/15 9:39:00 [显示全部帖子]

请问老师：下面的代码执行没有报错，但数据表不显示Duration结果，怎么纠正。

Select Case e.DataCol.Name
    Case "Star time","End time"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("Star time") OrElse dr.IsNull("End time") Then
            dr("Duration") = Nothing
        Else
            Dim tp As TimeSpan = dr("End time") - dr("Star time") 
            dr("Duration") = tp.TotalDays
        End If
End Select
 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/15 16:26:00 [显示全部帖子]

知道如何改了，是因为列名没有写对。谢谢指点。

 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/15 20:37:00 [显示全部帖子]

请教老师
     
我用下段程序生成数据树可行
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("表F", "第一列")

想通过下面代码实现click数据树的某个节点弹出快捷菜单实现其他功能，如何更改下面代码。谢谢！

Dim tr As WinForm.TreeView
Dim td As WinForm.TreeNode
'tr = Forms("Import").Controls("TreeView1")

Select  Case tr.Nodes.Count
       Case 0
          With e.Sender
           .ShowContextStrip(0, .Height, e.Form.Strips("importpreplot"))
          End With
       Case 1

       Case 2
End Select
 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/16 7:19:00 [显示全部帖子]

老师，程序不报错，就是不能弹出快捷菜单。是什么原因？

 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/16 12:23:00 [显示全部帖子]

老师，程序报错，提示：给定关键字不在字典中。什么意思？

 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/16 17:37:00 [显示全部帖子]

老师，我设计快捷菜单了，为什么还不行。附近是快捷菜单抓图。

 回到顶部
帅哥哟，离线，有人找我吗？
cglsg5076
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1020 积分：6670 威望：0 精华：0 注册：2015/2/25 23:14:00 		  发帖心情 Post By：2017/1/16 17:46:00 [显示全部帖子]

importpreplot就是快捷菜单名字，没有其他名字。

 回到顶部
总数 52 1 2 3 4 5 6 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07031 秒, 5 次数据查询