1个回答
展开全部
可以用sendkeys传送一个回车。
Private Sub Command1_Click()
Timer1.Enabled = True
MsgBox ""
End Sub
Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 5000
End Sub
Private Sub Timer1_Timer()
Timer1.Enabled = False
SendKeys "~"
End Sub
编译后，执行可执行文件（xx.exe)测试，在vb6集成环境中，msgbox ""是全阻塞的，
也就是说timer1也会停掉，编译后不会阻塞timer定时器。
最好的办法是用窗体模拟一个msgbox，这样控制起来比较方便。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
大雅新科技有限公司
2024-11-19 广告
这方面更多更全面的信息其实可以找下大雅新。深圳市大雅新科技有限公司从事KVM延长器,DVI延长器,USB延长器,键盘鼠标延长器,双绞线视频传输器,VGA视频双绞线传输器，VGA延长器,VGA视频延长器,DVI KVM 切换器等，优质供应商，...
点击进入详情页
本回答由大雅新科技有限公司提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
