Kodların içindeki bu function ne işe yarıyor ?
ve nerelerde kullanabilriz. Sanırım benim bazı
problemleri çözecek bir bekleme komutu mudur ?
Bilgi verirseniz sevinirim
Tşk.
Kod:
Function Bekle(Delay As Integer, DispHrglass As Integer)
Dim DelayEnd As Double
DoCmd.Hourglass DispHrglass
DelayEnd = DateAdd("s", Delay, Now)
While DateDiff("s", Now, DelayEnd) > 0
DoEvents
Wend
DoCmd.Hourglass False
End Function
_________________________
Demiral Hocam, cevap verdiğiniz
için çok tşk ederim.