سه شنبه ۳ ارديبهشت ۱۳۸۷, ۱۵:۴۳
--> تعریف تابع توی یک ماژول :
Public Declare Function
timeGetTime Lib "winmm.dll" () As Longاین تابع فقط یک خروجی دارد که زمان سپری شده سیستم است:
نحوه استفاده در برنامه : مانند تابع قبل یه منغییر از نوع
Long تعریف میکنید و به صورت زیر استفاده می کنید :Dim A as Long
()Private Sub Command1_Click
A = timeGetTime
Text1.Text = A
End Sub
>>
اگر تابع درست کار کند A برابر با زمان سپری شده و در غیر این صورت A=0 خواهد بود