Happy Codings - Programming Code Examples
Html Css Web Design Sample Codes CPlusPlus Programming Sample Codes JavaScript Programming Sample Codes C Programming Sample Codes CSharp Programming Sample Codes Java Programming Sample Codes Php Programming Sample Codes Visual Basic Programming Sample Codes


Visual Basic Programming Code Examples

Visual Basic > Windows and Controls Code Examples

Let your application wait for a certain time

Let your application wait for a certain time Public sub Pause(ByVal nSecond as Single) dim t0 as Single t0 = Timer do While timer - t0 < nSecond dim dummy as Integer dummy = DoEvents() ' if we cross midnight, back up one day If timer < t0 Then t0 = t0 - CLng(24) * CLng(60) * CLng(60) End If Loop End Sub Return