Foxtable(狐表)用户栏目专家坐堂 → [求助]内容滚动


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

主题:[求助]内容滚动

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


加好友 发短信
等级:幼狐 帖子:123 积分:943 威望:0 精华:0 注册:2013/7/25 14:52:00
  发帖心情 Post By:2014/4/2 15:30:00 [只看该作者]

而且是循环的

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/4/2 15:31:00 [只看该作者]

你选中不同的行就显示不同的行啊. 你不是要循环显示这样吗?


请您详细说明白你的需求.

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


加好友 发短信
等级:幼狐 帖子:123 积分:943 威望:0 精华:0 注册:2013/7/25 14:52:00
  发帖心情 Post By:2014/4/2 15:37:00 [只看该作者]

A表中的B列有多行的值,希望文本框每隔30秒依次自动显示这些值 第一个30秒显示A列第一行,第二个30秒第二行....

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/4/2 15:49:00 [只看该作者]

计时器

启用:True

间隔:30000

TimerTick

If Tables("记帐").Position < Tables("记帐").Rows.Count - 1 Then
    Tables("记帐").Position + = 1
ElseIf Tables("记帐").Position = Tables("记帐").Rows.Count - 1 Then
    Tables("记帐").Position = 0
End If
e.Form.Controls("TextBox1").Text = Tables("记帐").Current("日期")

[此贴子已经被作者于2014-4-2 15:50:19编辑过]

 回到顶部
总数 14 上一页 1 2