'' Dim wait as New OneOffTimer(millisecondsToWait, AddressOf SubToExecuteWhenComplete) Public Sub doSomething() Console.Writeline("Timer has expired") End Sub Dim wait As New OneOffTimer(1000, ...
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) Private Declare Function GlobalAlloc Lib "kernel32" (ByVal wFlags As Long, ...