Foxtable(狐表)用户栏目专家坐堂 → 我想要做个日记


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

主题:我想要做个日记

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/9/11 11:40:00 [显示全部帖子]

用这个事件就行了,单击某个日期,就从表中找出这个日期对应的行,并定位到这一行:
http://www.foxtable.com/help/topics/2120.htm


 
例如: 
 
Dim wz As integer =  Tables("日记表的表名").FindRow("日期 = #" & e.Sender.Value & "#")
If wz > 0 Then
     Tables("日记表的表名").Position = wz
End if


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/9/11 15:57:00 [显示全部帖子]

Dim wz As Integer =  Tables("表A").FindRow("第一列 = #" & e.Sender.Value & "#",0,False)
If wz > 0 Then
     Tables("表A").Position = wz
End If

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/9/11 17:06:00 [显示全部帖子]

如果某天没有日期,则显示空,那么你不能用绑定的。

 

 

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


 回到顶部