'Get TickCountPrivate Declare Function GetTickCount&Lib "kernel32" ()Private Sub Form_Load()ret& = GetTickCount&MsgBox Str$(ret& / 60000) + " minutes."End Sub
No comments:
Post a Comment