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
Ö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.