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


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

主题:[求助]topvisiblerow的问题

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


加好友 发短信
等级:六尾狐 帖子:1297 积分:10461 威望:0 精华:1 注册:2018/1/20 12:40:00
[求助]topvisiblerow的问题  发帖心情 Post By:2018/10/8 19:12:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20181008191135.png
图片点击可在新窗口打开查看

左边是表,右边是窗口表,单元格高度是一样的,用以下代码,为啥对应的可见行的位置错开了呢。应该怎么调整

 Tables("进度安排_table1").TopVisibleRow = Tables("XMFP").TopVisibleRow 
[此贴子已经被作者于2018/10/8 19:12:49编辑过]

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


加好友 发短信
等级:六尾狐 帖子:1297 积分:10461 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/10/8 19:30:00 [显示全部帖子]

还有个问题。为啥右边的窗口表打开的时候,左边表格的当前选择行的颜色显示会错乱,滚动滚轮才会好。

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20181008192834.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:六尾狐 帖子:1297 积分:10461 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/10/8 22:45:00 [显示全部帖子]

上面还是能对上的。越往下,越对不上了。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.foxdb


[此贴子已经被作者于2018/10/8 22:45:31编辑过]

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


加好友 发短信
等级:六尾狐 帖子:1297 积分:10461 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/10/8 23:00:00 [显示全部帖子]

颜色错乱是在窗口表的currentchanged里面的代码

Dim tbl2 As Table =  Tables("表A")
If e.Table.Current IsNot Nothing Then
    Dim r As Integer
    r = tbl2.FindRow("_IDENtify = '"& e.table.Current("_identify") &"'") '
    tbl2.Select(r,0)

End If

[此贴子已经被作者于2018/10/8 23:01:06编辑过]

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


加好友 发短信
等级:六尾狐 帖子:1297 积分:10461 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/10/8 23:01:00 [显示全部帖子]

刚才忘记加了。

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


加好友 发短信
等级:六尾狐 帖子:1297 积分:10461 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/10/8 23:30:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.foxdb


图片点击可在新窗口打开查看此主题相关图片如下:2018108-232903.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2018/10/8 23:29:55编辑过]

 回到顶部