VB.net 如何设定准确的1秒时间？

Posted 2023-04-26

在vb2005中，我需要一个倒计时器，倒计时器倒计时的时间为非常准确的1秒，当1秒计时完成后触发一个事件（例如触发一个textbox1.backcolor=color.red）
我的问题是使用Timer控件定时到准确的一秒，一秒之后就不在触发timer控件（timer不在循环触发），这样如何控制timer控件？

form 的load事件中加一句：timer1.interval=1000

在一个按钮里面加入一句触发timer事件开始计时的代码：
timer1.enabled=true

timer的tick事件中加入这么两句：
textbox1.backcolor=color.red
timer1.enabled=false 参考技术A int i=0;//一定要放在方法外面.
timer_tick(sender,e)

if(i<999)

i++;

else

textbox1.backcolor=color.red
timer1.stop();

参考技术B 用现成的控件呀，，，timer就搞定了追问

看你的级别蛮高的，估计你学习VB.net的经验比较丰富，麻烦你根据我的问题补充帮我编写一个能实现上述功能的程序（定时器准确计时到一秒后触发一个textbox1.backcolor=color.red，之后定时器不再循环触发）。先谢谢了!

如何在 VB.NET 中按位移位？

【中文标题】如何在 VB.NET 中按位移位？

【英文标题】：How to bitwise shift in VB.NET?

【发布时间】：2010-11-27 21:46:37

【问题描述】：

如何在 VB.NET 中按位右移/左移？它甚至有operators，还是我必须使用一些实用方法？

【问题讨论】：

没错there mate，就在您发布的链接的列表中！

【参考方案1】：

自 2003 年以来，VB.NET 已经有了位移运算符（<< 和 >>）。

【讨论】：

我认为代码示例是有序的，例如对于UInteger。

包括一个适用于最高有效位的示例。

【参考方案2】：

您可以使用<< 和>> 运算符，并且您必须指定要移位的位数。

myFinal = myInteger << 4   ' Shift LEFT by 4 bits.
myFinal = myInteger >> 4   ' Shift RIGHT by 4 bits.

您也可以将其用作一元运算符...

myFinal <<= 4     ' Shift myFinal LEFT by 4 bits, storing the result in myFinal.
myFinal >>= 4     ' Shift myFinal RIGHT by 4 bits, storing the result in myFinal.

【讨论】：

myFinal 是什么类型？未签名还是已签名？多少位？ Integer? UInteger?