Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Dropdown menü

exmadon
exmadon
Access Cevaplanmış Soruları
4
1923

Dropdown menü

#2
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 10/03/2025,22:50
Yorumları: 13.543
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Yapabilirsiniz.

Forma mtn_gecici adında metin kutusu ekle,

vba sayfasındaki denetimlere ait kodları sil, 

Ayrıntının "Fare Taşındığında" olayına;


Private Sub Ayrıntı_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.mtn_gecici.SetFocus
K1.Visible = False
K2.Visible = False
K3.Visible = False
K8.Visible = False
K9.Visible = False
K10.Visible = False
End Sub


K0 butonunun fare taşındığında olayına

Private Sub K0_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.mtn_gecici.SetFocus
K1.Visible = True
K2.Visible = True
K3.Visible = True
K8.Visible = False
K9.Visible = False
K10.Visible = False
End Sub


K7 butonunun fare taşındığında olayınada

Private Sub K7_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.mtn_gecici.SetFocus
K1.Visible = False
K2.Visible = False
K3.Visible = False
K8.Visible = True
K9.Visible = True
K10.Visible = True
End Sub

kodlarını ekle.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Dropdown menü - Yazar: exmadon - 06/12/2016, 01:24
Cvp: Dropdown menü - Yazar: ozanakkaya - 06/12/2016, 03:14
Cvp: Dropdown menü - Yazar: exmadon - 06/12/2016, 10:24
Cvp: Dropdown menü - Yazar: okumas - 06/12/2016, 12:28
Cvp: Dropdown menü - Yazar: atoz112 - 06/12/2016, 13:37
Task