Foxtable(狐表)用户栏目专家坐堂 → [求助]官方甘特图的范例的问题


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

主题:[求助]官方甘特图的范例的问题

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/5/29 9:49:00 [显示全部帖子]

执行代码,把行高设置同一

 

Tables("任务").DefaultRowHeight = 20
Tables("窗口1_Table2").DefaultRowHeight = 20

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/5/29 12:31:00 [显示全部帖子]

你要隐藏滚动条?

 

Tables("任务").grid.ScrollBars = 2 '0 无 1 横向 2 纵向 3 横向纵向
Tables("窗口1_table2").grid.ScrollBars = 2 '0 无 1 横向 2 纵向 3 横向纵向

 

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/5/29 13:24:00 [显示全部帖子]

有什么问题?截图说明

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/5/29 14:31:00 [显示全部帖子]

修改代码

 

If Forms("窗口1").Opened Then
    Dim tbl As Table = Tables("窗口1_Table2")
    tbl.ScrollPosition = e.Table.ScrollPosition
    Functions.Execute("SetGanntLeftCol")
End If

 

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

 

Dim tbl As Table = Tables("任务")
tbl.ScrollPosition = e.Table.ScrollPosition


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/5/29 15:24:00 [显示全部帖子]

 

1、你隐藏滚动条啊;

 

2、看看 http://www.foxtable.com/webhelp/scr/2357.htm

 


 回到顶部