ايران ويج

درسته برای همن هم همین طوره. فکر می کنم باید یه قاعده ای داشته باشه این اعداد.
در مورد اون و تا عدد زمان هم به به این نتیجه رسیدم:
Private Sub Form_Load()
lngHighValue = &H1C81C48
lngLowValue = &HC6795E88

If lngLowValue < 0 Then
lngHighValue = lngHighValue + 1
End If
If lngHighValue = 0 And lngLowValue = 0 Then
diff = 0
End If

MsgBox DateAdd("d", ((lngHighValue * 2 ^ 32 + lngLowValue) / 600000000 - diff) / 1440, #1/1/1601#)
End Sub

فقط شما باید HighValue و LowValue رو از روی سیستم خودت مقدار دهی کنی اما بدیش اینه که خروجی فقط
مربوط به تاریخ می شه و لحظه دقیق رو نشون نمی ده!

سلام.
اگه Refcount واسه شما هم همین طوره که این روش مناسب نیست. چون در حالت سوییچ یوزر نمیشه یوزر جاری رو پیدا کرد.
تاریخ هم که نمیتونه کار را بندازه.