·上一篇:Asp.net图片上传并生成缩略图(C#)
·下一篇:VB 获取计算机当前用户名实例
一个非常好用的VB 延时函数
- VBScript code复制代码
Private Declare Function timeGetTime Lib "winmm.dll" () As Long '该声明得到系统开机到现在的时间(单位:毫秒) Public Function Sleep2(T As Long) Dim Savetime As Long Savetime = timeGetTime '记下开始时的时间 While timeGetTime < Savetime + T '循环等待 DoEvents '转让控制权 Wend End Function '在要延时的地方调用 Sleep2(15000) '延时15秒