lol冠军之隐:VB 6.0代码问题

来源:百度文库 编辑:高校问答 时间:2024/04/30 04:40:08
VB 6.0中如果不使用Timer控件,如何靠代码实现Timer控件功能呢?
(如果使用循环语句会造成假死)

' System.Threading.Thread.Sleep(500)'等待半秒钟
' Application.DoEvents()

比如Dim Index as Integer
For Index = 1 to 100
System.Threading.Thread.Sleep(500)
Application.DoEvents()
你的代码
Next

VB源代码文件如果是完整的,而你的机器安装有同版本的VB编程软件,可在运行VB编程软件后,通过打开方式在VB源代码文件找*.VBP或.MAK或.VBG文件打开,可看到VB加载后有一些代码窗口,按F5键或点菜单栏运行,选启动或其下右向箭头可运行该VB代码,当然这些代码是无问题且相关文件在规定位置.
如果你的VB是6.0版,你可安装MSDN6.0(2光盘),它对学习VB大有帮助.

TIME控件是不能放入循环的。如果你需要循环用TIME控件的时间值来控制,来IF THEN 来判断是否该结束该事件。

sub timer()
if in=ture then '结束
'事件代码
end sub