(18/12/2010, 14:59)mehmetdemiral yazdı: Ayrıca yine bir event komutu kullanım örneği olarak https://accesstr.net/konu-access-gizleme...tml?page=2 konusunu da inceleyiniz.

sn. mehmetdemiral ;
gösterdiklerinize baktım ancak çok karışık geldi, ayrıca benim yapmak istediğim çok daha basit bir şey yani ;

Private Sub Report_Timer()
BİR SANİYE GEÇİNCE aşağıdakini yap ;
SendKeys "{enter}"
End Sub

bunu kodlarla nasıl derim ?
zamanı saydırmayı bilmiyorum yani.
bir bakarmısınız, teşekkürler...

Formunuzun general declerations kısmına en alta

Private Declare Sub Sleep Lib "kernel32" (ByVal milliseconds As Long)

yazın. Böylece Api kullanabileceğiz. Şimdi artık programın herhangibir yerinde

Sleep 400

şeklinde milisaniye cinsinden süreyi belirterek verdiğiniz süre kadar beklenmesini sağlarsınız.

Diğer bahsettiğim yöntem de aslında Api kullanmadan fonksiyon ile yapılan daha basit bir çözümdür. Onda da bir fonksiyon hazırlarsınız.

Public Sub Bekle(süre As Double)

 Dim baslama

 baslama = Timer

 Do While Timer < baslama + süre

    DoEvents

 Loop

End Sub

Artık istediğiniz yerden

bekle(5)

şeklinde süre vererek kullanabilirsiniz.

(18/12/2010, 17:30)mehmetdemiral yazdı: Formunuzun general declerations kısmına en alta

Private Declare Sub Sleep Lib "kernel32" (ByVal milliseconds As Long)

yazın. Böylece Api kullanabileceğiz. Şimdi artık programın herhangibir yerinde

Sleep 400

şeklinde milisaniye cinsinden süreyi belirterek verdiğiniz süre kadar beklenmesini sağlarsınız.

Sn. mehmetdemiral ;
sonunda başardım , sayenizde , programcılığın bu yönünü hep sevmişimdir. çıkan sorunları bir şekilde kodlarla hallediyorsunuz.
kodlarla önce ctrl a yapıyorum 1 salise sonrada kodlarla yukarı yön tuşuna basıyorum ve ekran sorunsuz açılıyor. tekrar teşekkürler. iyi çalışmalar..

O halde konuyu cevaplanmışlara taşıyorum.