[VBA] Komutlar Arası Bekleme Ekleme
#1
merhaba
aşağıdaki butona bastığımda  20  saniye bekledikten sonra close satırının devreye girmesini nasıl sağlayabilirim acaba  
yardımlarınız  için teşekkürler.



Private Sub Komut7_Click()
me.Refresh

DoCmd.Close     '(20 saniye  sonra  devreye  girsin )
End Sub



  Alıntı
Bu mesajı beğenenler:
#2
aşağıdaki kodu deneyebilirsiniz
Visual Basic
  1. t1 = Now
  2. t2 = t1
  3. me.Refresh
  4. Do While DateDiff("s", t1, t2) < 20
  5. t2 = Now
  6. DoEvents
  7. Loop
  8. DoCmd.Close





  Alıntı
Bu mesajı beğenenler: feraz
#3
teşekürler sayın halily



  Alıntı
Bu mesajı beğenenler:
#4
rica ederim
iyi çalışmalar



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [VBA] Tablolar Arası Dağılım benuva 1 194 09-02-2024, 00:56
Son Mesaj: halily
access-sql-18 [VBA] Veritabanları Arası şartlı Tablo Kopyalama BeyTor 5 253 22-07-2023, 00:29
Son Mesaj: dsezgin
  Formlar Arası Veri Gönderme kursun 2 178 26-11-2022, 22:14
Son Mesaj: kursun
  Kayıtlar Arası Gezinti Tuşlarının Iptali Hk. adnnfrm 1 122 01-10-2022, 09:45
Son Mesaj: alperalper
  [VBA] Iki Tarih Arası Zaman Sayarken Kritere Uymaması alperalper 5 289 20-09-2022, 08:33
Son Mesaj: dsezgin
  Sql Iki Tarih Arası Fark benuva 11 466 25-08-2022, 17:38
Son Mesaj: halily
  [VBA] Iki Tarih Arası Filtrelemede Hata derzulya 2 192 17-06-2022, 08:14
Son Mesaj: derzulya
  Iki Tarih Arası Filtre Kodlarını Uygulama Sorunu tarkanaykın 4 281 27-04-2022, 21:48
Son Mesaj: tarkanaykın

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi