求时间差问题！来拿分吧！！！！！

Question

用datediff函数，在VB帮助中有些函数！

Answer 1

datediff("s",mystart,myend),可取得运行了多少秒

Answer 2

dim  mystart
dim  myend
dim myinterval as integermystart = timer
......
myend = timer
myinterval = int((mystart - myend)*1000) 'mS

Answer 3

取时间用
GetTickCount VB声明 
Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long 
说明 
用于获取自windows启动以来经历的时间长度（毫秒） 
返回值 
Long，以毫秒为单位的windows运行时间