Foxtable(狐表)用户栏目专家坐堂 → [求助]倒计时


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

主题:[求助]倒计时

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


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
[求助]倒计时  发帖心情 Post By:2010/8/4 10:12:00 [只看该作者]

在窗口10秒后作如下动作

MainTable = Tables("总览")
forms("操作选项").open()
Audio.Play(ProjectPath & "wav\欢迎.wav")
e.form.close()


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/8/4 10:14:00 [只看该作者]

启用窗口定时器,定时器的间隔设置为10000,也就是10秒,定时器的代码设置为上述代码。

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


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By:2010/8/4 10:32:00 [只看该作者]

本窗口有一流动文字已经启用了定时器定时器的间隔设置为300,如果间隔设置为10000,流动文字就不动了,我想二者兼得要如何设置?

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/8/4 10:39:00 [只看该作者]

定时器加一段:

 

Static i As Integer

i = i+1

If i = 33 Then

   '你前面的代码

End If

 


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


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By:2010/8/4 10:52:00 [只看该作者]

谢谢!

 回到顶部