Skip to main content

AccessTr.neT M.


Metin Kutusu İstenildiği Zaman Okunur, İstediğim Zaman Yazılır Olsun

Metin Kutusu İstenildiği Zaman Okunur, İstediğim Zaman Yazılır Olsun

Çözüldü #1
Merhaba

Access Form'da Hücreyi (metin kutusu) istenildiği zaman okunur, istediğim zaman yazılır olsun. Komutu nasıl konulur?

İyi Çalışmalar

Ergün Turan

Cevapla
#2
İstenildiği zaman dediğinize göre bunu bir şarta bağladığınızı varsayıyoruz ve bu şart formda oluşturduğunuz bir onay kutusu olduğunu varsayıyoruz.
Onay kutusu seçili ise metin kutusu kilitli olsun, değil se yazılabilir olsun.
Bunun için kodları ilgili matin kutusunun GotFokus olayına yazıyoruz. Metin kutusuna fokusladığımızda onay kutusunun durumuna göre yazılabilir, ve ya yazılamaz olacaktır.

Private Sub Metin1_GotFocus()
    Me.Metin1.Locked = Me.Onay1
End Sub

Mesajlarımızı Türkçe yazım kurallarına uygun yazalım.
Emeğe saygı gösterelim, bir teşekkürü çok görmeyelim.
Cevapla
...........
#3
Merhaba

Private Sub Buton1_Click()
If Me.Buton1Label.Caption = "Düzenleme Açık" Then
    Me.Buton1Label.Caption = "Düzenleme Kapalı"
    
    'Me.Tahsilat_Makbuzu_Alt.Locked = True
Me.Sira_No.Locked = True
Me.Stok_No.Locked = True
Me.Arge_No.Locked = True
Me.Tanim.Locked = True
Me.Yer.Locked = True
Me.Paket.Locked = True
Me.Firma_Adi.Locked = True
Me.Aciklama.Locked = True
Me.TFS_ID.Locked = True
Me.Durum.Locked = True

 Me.Buton1Box.BackColor = vbRed
Me.Tanim.SetFocus
Else

       Me.Buton1Label.Caption = "Düzenleme Açık"
           'Me.Tahsilat_Makbuzu_Alt.Locked = False
    Me.Sira_No.Locked = False
Me.Stok_No.Locked = False
Me.Arge_No.Locked = False
Me.Tanim.Locked = False
Me.Yer.Locked = False
Me.Paket.Locked = False
Me.Firma_Adi.Locked = False
Me.Aciklama.Locked = False
Me.TFS_ID.Locked = False
Me.Durum.Locked = False

         Me.Buton1Box.BackColor = vbGreen
         Me.Tanim.SetFocus
         
    End If
    End Sub

Cevapla
#4
Merhaba

Bu code çalışıyor. Fakat ara ıra bozuluyor. ilk Açılışta düzenleme kapalı gelmesi gerekirken Düzenleme  açık geliyor.
 Yardımcı olur musunuz?

Cevapla
...........
#5
(27/04/2019 19:49)ergntrn Adlı Kullanıcıdan Alıntı: Merhaba

Bu code çalışıyor. Fakat ara ıra bozuluyor. ilk Açılışta düzenleme kapalı gelmesi gerekirken Düzenleme  açık geliyor.
 Yardımcı olur musunuz?
 Formun geçerli olduğunda olayına kilitli olması gereken denetimler için me.metinkutusu.locked=true şeklinde kod ekleyin.

"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
#6
Dosya nasıl göndereceğim

Cevapla
...........

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

Yorum yapmak için üye olmanız gerekiyor

ya da