Foxtable(狐表)用户栏目专家坐堂 → [求助]全局代码中动态创建Timer


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

主题:[求助]全局代码中动态创建Timer

帅哥哟,离线,有人找我吗?
不可思议的虫
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:32 积分:589 威望:0 精华:0 注册:2014/6/20 14:51:00
[求助]全局代码中动态创建Timer  发帖心情 Post By:2015/8/28 23:27:00 [只看该作者]

下列代码运行时进入不了CTSTimer_Tick事件,有什么办法解决?代码都写在全局代码中

Public CtsTmr As System.Windows.Forms.Timer

Public Sub XXX
CtsTmr = New System.Windows.Forms.Timer
CtsTmr.Interval = 150
CtsTmr.Enabled = True
'事件委托
AddHandler CtsTmr.Tick, AddressOf CTSTimer_Tick
End Sub

Public Sub CTSTimer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)
    Dim myTimer As System.Windows.Forms.Timer
    myTimer = sender

    messagebox.show("timer")
   
    myTimer.Enabled = False
 End Sub

[此贴子已经被作者于2015/8/28 23:28:52编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107670 积分:547671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2015/8/29 9:20:00 [只看该作者]

你需要在外部调用一下这个方法才行啊

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


加好友 发短信
等级:婴狐 帖子:32 积分:589 威望:0 精华:0 注册:2014/6/20 14:51:00
  发帖心情 Post By:2015/8/29 16:21:00 [只看该作者]

外部有调用,代码没贴上来,研究了很长时间还是不行后来写个线程代替Timer了

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107670 积分:547671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2015/8/29 16:33:00 [只看该作者]

可以的兄弟

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/8/29 16:38:00 [只看该作者]

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=73927

 回到顶部