Timer1——Interval=500
vb的问题,我用的mscomm控件,需要用一个timer控件,间隔时间1s,在timer控件中循环执行下面代码六次。
循环执行六次然后cpu就特别高,达到100%了,这是为什么呢?
我查看了循环执行六次程序代码:
Dim inbyte8() As Byte
Dim yanzheng12 As String
Dim com(7) As Byte
com(0) = 136
com(1) = com(0)
com(2) = 82
com(3) = 1
com(4) = 0
com(5) = 0
com(6) = 90
com(7) = 1
MSComm1.CommPort = 1
MSComm1.PortOpen = True
MSComm1.Settings = "4800,n,8,2"
MSComm1.InputMode
comInputModeBinary
MSComm1.Output = com
Dim t As Single
t = Timer
While Timer < t + 0.2
DoEvents
Wend
inbyte8 = Form1.MSComm1.Input
yanzheng12 = inbyte8
最后我将下列:
MSComm1.CommPort = 1
MSComm1.PortOpen = True
MSComm1.Settings = "4800,n,8,2"
MSComm1.InputMode
comInputModeBinary
这些移到form_load()
里面去再测试了下,问题解决。
扩展资料:
先看一段代码:
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Me.Timer1.Enabled = False
MessageBox.Show("测试")
End Sub
对于VB.NET初学者,一般会认为在执行“ Me.Timer1.Enabled = False”语句后,Timer1_Tick过程就会中断并跳出Sub,之后不会弹出"测试"对话框,这其实是错误的,本段代码会弹出"测试"对话框。
步骤1中的代码只是对这一问题进行的最简单的说明,当Timer1_Tick过程代码有多行时,特别是逻辑关系比较复杂时,一定要注意这一点,以防止出现逻辑错误。步骤1中的代码如果不想弹出"测试"对话框,可以将代码修改为如下所示:
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Me.Timer1.Enabled = False
Exit Sub
MessageBox.Show("测试")
End Sub
上述就是VB.NET中Timer控件使用过程容易出错的地方之一。
...1每隔1秒触发一次Timer事件,应将Timer1控件的___属性设置为...
Timer1——Interval=500 vb的问题,我用的mscomm控件,需要用一个timer控件,间隔时间1s,在timer控件中循环执行下面代码六次。循环执行六次然后cpu就特别高,达到100%了,这是为什么呢?我查看了循环执行六次程序代码:Dim inbyte8() As Byte Dim yanzheng12 As String Dim com(7) As Byte com(0)...
vb语言问题,要使计时器每秒触发一次timer事件,则需把interval属性设置为...
vb语言问题,要使计时器每秒触发一次timer事件,则需把interval属性设置为1\/1000秒。VB编程过程中,通过引发Timer事件,Timer控件可以有规律地间隔一段时间执行一次代码。interval语法:INTERVAL 'integer [- integer]' {YEAR | MONTH} [(precision)][TO {YEAR | MONTH}]。该数据类型常用来表示一段时间...
定时器Timer控件可识别的事件是什么?发生该事件的时间间隔由定时器的...
控件可识别的事件是 Timer ,Interval 属性设置。System.Windows.Forms.Timer是应用于WinForm中的,是通过Windows消息机制实现的,类似于VB或Delphi中的Timer控件,内部使用API SetTimer实现的,主要缺点是计时不精确,而且必须有消息循环,Console Application(控制台应用程序)无法使用。System.Timers.Timer和Syste...
C# 使用Timer控件设置时间间隔
默认值为false。例1:创建Windows应用程序,窗体加载时,将 Timer 控件的 Interval 属性设为1000毫秒,即1秒,以实现每秒触发一次事件。事件中,文本框显示当前系统时间。在按钮的 Click 事件中,调整 Enabled 属性以启用或停止计时器。具体代码实现如下,程序运行结果如图2所示,可实现系统时钟功能。在启动...
VB计时器有哪些重要属性?
Timer 控件有两个重要属性:Enabled和Interval 其中,若希望窗体一加载定时器就开始工作,应将Enabled属性设置为 True。否则,保持此属性为 False。有时可能选择由外部事件(例如单击命令按钮)启动定时器操作。Interval是计时器最重要的属性,用于设置计时器事件之间的时间间隔,取值在0~65767(ms)之间。如果...
关于visual foxpro 6.0中的打印输出问题
…这样的形式保存。在表单中添加计时器timer1,timer1的interval属性设为100,enabled属性设为.t.,再添加image1控件,其backstyle属性设为0(透明),stretch也设为0(裁剪)。--- 在form的load过程中写代码:public i , n i=0 n=5(静止图片的总共数目)在timer1的timer过程中写代码:local j ...
VB计时器的interval属性?
Interval属性是Timer控件最重要的一个属性,它以千分之一秒为单位指定Timer事件之间的间隔,理论上可以认为最少可设置为1毫秒触发一次Timer事件,另外一个重要属性是Enabled属性,它决定计时器是否开始工作。因为Timer控件响应时间的流逝,独立于用户,可以成为编程者的“好帮手”,所以在实践中很受欢迎。
计算机二级VB考试基础知识VisualBasic的特点和版本
7.如果要每隔0.5 s触发一个Timer事件,则Interval属性应设置为 [ 10 ] 。 8.单选按钮和复选框都有Value属性,但二者该属性值的类型不一样,其中单选按钮该属性值类型为 [ 11 ] ,复选框该属性值类型为 [ 12 ] 。 9.要在程序中显示通用对话框,要对CommonDialog控件的 [ 13 ] 属性赋以正确的值。 10.VB...
为何我的vb计时器不能每隔1秒触发一次Timer事件
拖动一个Timer控件到窗体里,Interval属性设置为1000,然后在Timer1_Timer事件每隔一秒就会触发了 ,例如:Private Sub Timer1_Timer()Me.Caption = Now End Sub
VB倒计时怎么做
1、首先,建立一个工程,并在窗口中添加三个命令按钮,caption分别改为“设置倒计时”、“启动倒计时”、“继续”,将窗体Form1的caption属性改为“倒计时”,再添加一个计时器控件,并且添加一个文本框,将界面设置成如下图所示。2、将文本框的Text里的属性清空干净,再把字体Font的属性调整成为小四,...