[求助]全局代码中动态创建Timer - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有3057人关注过本帖树形打印复制链接主题：[求助]全局代码中动态创建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

等级：婴狐帖子：32 积分：589 威望：0 精华：0 注册：2014/6/20 14:51:00

Post By：2015/8/29 16:21:00 [显示全部帖子]

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

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