Kod:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
'********f3 TUŞU KULLANIMI********
Case vbKeyF3: Onay1.SetFocus
Onay1 = -1
If Onay1 = -1 Then
Me.Uetiket.Visible = True
Me.Uaçıklama.Visible = True
Me.Uaçıklama.SetFocus
Else
Me.Uetiket.Visible = False
Me.Uaçıklama.Visible = False
End If
Bu ve bunun gibi...
örneğinizi inceledim fakat form adını Me. den sonra mı yazmamız gerekiyor.? Ve bunu yaptıktan sonra F tuşuna bastığımızda hemen çalışır mı?
Size basit bir örnek hazırlıyorum. Biraz bekleyin.
kodların kullanılacağı formun yüklendiğinde olay yordamına
Me.KeyPreview = True
yazmalısınız. Bunu yapmadan kodlar çalışmaz. Örneği inceleyin.
Abi keşke hemen eklemeseydiniz atlantis8334 ü tembelliğe alıştıracaksınız
İpucunu verdim zaten Fonksiyon diye. Sadece arama yapacaktı ve sevgili cuneyt'in güzel örneğini görecekti
Ben sizin yerinizde olsam ek dosyayı siler kendi başına yapmasına çalışırdım
Öyle ama ben kendi örneğim üzerinde gösterdim. Onu kendi çalışmasına ekleyerek bence bugünkü dersini görmüş olacak Olcay.. Ben de o şekilde kendimi geliştiriyorum halen. Başkalarının örneklerini kendi projelerimde kullanırken çok iyi bir öğrenme gerçekleşiyor. Şimdi arkadaş işin kolayına sapacak ve makro ile bu işi halledecekti.