What is "Timer" ???. Don't see it declared . Are you just trying to loop for a certain amout of time and still process events ?Originally Posted by IntellaWorks
Argh I was wondering if you guys could help me out here. I've ben stumbling over this code for a few hours and I'm willing to bet one of you have the anwser. Any help would be great !
ok, I'm using VB.Net and I for the life of me cannot convert this vb6 code:
Code:Sub timeout(seconds As Double) Dim total As Double Dim current As Double Dim X As Double X = Timer Do DoEvents current = Timer total = current - X Loop Until total > seconds End Sub
Progress [I will seriously never be done!]
Via EPIA MII
512MB RAM
OEM GPS (embedded)
nLite WinXP pro on
1GB Extreme III CF card
Carnetix 1260 startup/ DC-DC regulator
Software: Still, re-Writing my existing front end in .Net
What is "Timer" ???. Don't see it declared . Are you just trying to loop for a certain amout of time and still process events ?Originally Posted by IntellaWorks
VWmike, if your not familiar with VB6 then dont try to answer it....timer is the current cpu clock time
PC Components:
Lilliput; XPC/FLEX mobo; 1.7 ghz P4 Mobile;512 DDR; 160 gb HDD; opus 150; slot usb dvd-rw
My work log
i think this is close
Imports System
Imports System.Threading
Public Class Form1
Inherits System.Windows.Forms.Form
Sub timeout(ByVal seconds As Double)
Thread.Sleep(seconds * 1000)
End Sub
End Class
PC Components:
Lilliput; XPC/FLEX mobo; 1.7 ghz P4 Mobile;512 DDR; 160 gb HDD; opus 150; slot usb dvd-rw
My work log
nope :-\ grrrrrr this is such an easy thing
Progress [I will seriously never be done!]
Via EPIA MII
512MB RAM
OEM GPS (embedded)
nLite WinXP pro on
1GB Extreme III CF card
Carnetix 1260 startup/ DC-DC regulator
Software: Still, re-Writing my existing front end in .Net
here it is exactly
Sub timeout(ByVal seconds As Double)
Dim x, current, Total As Double
x = Microsoft.VisualBasic.DateAndTime.Timer
Do
Application.DoEvents()
current = Microsoft.VisualBasic.DateAndTime.Timer
Total = current - x
Loop Until Total > seconds
End Sub
PC Components:
Lilliput; XPC/FLEX mobo; 1.7 ghz P4 Mobile;512 DDR; 160 gb HDD; opus 150; slot usb dvd-rw
My work log
Awesome.. thats where they hid the timer.... thanks a bunch !
Progress [I will seriously never be done!]
Via EPIA MII
512MB RAM
OEM GPS (embedded)
nLite WinXP pro on
1GB Extreme III CF card
Carnetix 1260 startup/ DC-DC regulator
Software: Still, re-Writing my existing front end in .Net
no prob
PC Components:
Lilliput; XPC/FLEX mobo; 1.7 ghz P4 Mobile;512 DDR; 160 gb HDD; opus 150; slot usb dvd-rw
My work log
Bookmarks