DerickBao 2022-12-12 23:28 采纳率: 100%
浏览 25
已结题

关于vb.net中在新建线程中创建timer执行程序问题

在如下代码中,需要实现的效果是,点击一个按钮新建一个线程,然后创建一个timer,每隔一秒输出一个ok。但是它不工作,如果加上那句MsgBox("开始"),那么它又可以工作了?这是为什么呢?

Private Sub BarButton()

Dim TdCAN1Recieve = New System.Threading.Thread(AddressOf Timer)
TdCAN1Recieve.Start()

End Sub ‘点击按钮创建一个线程

Sub Timer()

Dim t As New Windows.Forms.Timer

 t.Interval = 1000

 t.Enabled = True

 AddHandler t.Tick, AddressOf MSG

 ‘MsgBox("开始")

End Sub ‘创建一个Timer,每一秒运行一次MSG

Sub MSG()

 MsgBox(“OK”)

End Sub

  • 写回答

1条回答 默认 最新

  • 赵4老师 2022-12-13 09:26
    关注

    Timer创建应该放在Sub Timer之外

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

问题事件

  • 系统已结题 12月23日
  • 已采纳回答 12月15日
  • 创建了问题 12月12日

悬赏问题

  • ¥15 halcon DrawRegion 提示错误
  • ¥15 FastAPI Uvicorn启动显示404
  • ¥15 centos7.9脚本,怎么排除特定的访问记录
  • ¥15 关于#Django#的问题:我的静态文件呢?
  • ¥15 关于CPLEX的问题,请专家解答
  • ¥15 cocos的点击事件 怎么穿透到 原生fragment上。
  • ¥20 基于相关估计的TDOA算法中的加权最小二乘拟合法matlab仿真
  • ¥20 基于相关估计的TDOA算法中的自适应加权广义互相关法。
  • ¥15 abaqus CAE 2024软件启动问题
  • ¥20 基于相关估计的TDOA算法中的局部互相关函数滤波matlab仿真