感觉使用效果比时间控件爽些哈！！！ Private Declare Function timeGetTime Lib "winmm.dll" () As Long Function Delay(Dtime As Integer) As Long Savetime = timeGetTime While timeGetTime < Savetime + Dtime DoEvents Wend End Function
void CPackDlg::OnBtnPack() { // TODO: Add your control notification handler code here CFileDialog savedlg(FALSE,NULL,NULL,OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,"(类型：*.free)|*.free||"); if (IDOK != savedlg.DoModal()) return; int nTimeBegin = time(NU
可以设置定时关机，一段时间后关机 Private Sub Command1_Click() h = Combo1.Text s = Combo2.Text If (h >= 0 And h = 0 And s <= 59) Then Text1.Text = Combo1.Text + ":" + Combo2.Text Form2.Hide Else: MsgBox "你输入的数据格式不正确，是否继续?", vbOKOnly, "错误提示" End If Shell "cmd /
Option Explicit Public bln_busy As Boolean Public bln_success As Boolean Public bln_readword As Boolean Public Declare Function timeGetTime Lib "winmm.dll" () As Long
在Pentium以上的CPU中，提供了一条机器指令RDTSC（Read Time Stamp Counter）来读取这个时间戳的数字，并将其保存在EDX:EAX寄存器对中。由于EDX:EAX寄存器对恰好是Win32平台下C++语言保存函数返回值的寄存器，所以我们可以把这条指令看成是一个普通的函数调用。
基于VB的文字动画特效代码Private Sub TextEffect( _ ByVal sText As String, _ ByVal lX As Long, ByVal lY As Long, _ Optional ByVal bLoop As Boolean = False, _ Optional ByVal lStartSpacing As Long = 128, _ Optional ByVal lEndSpacing As L ong = -1, _ Optional ByVal
