Skip to main content

AccessTr.neT


form ta veri girişi yaptığım textbox kilitlensin

form ta veri girişi yaptığım textbox kilitlensin

Çözüldü #4
Bilgi girildiği anda girilen bilgilerde değişiklik yapılamasın diyorsunuz,
yani bilgi girildikten sonra ister 1 dk., ister 1 saat sonra değiştirilemesin.
Daha sonra da 10 saat geçtikten sonra veriler değiştirilemesin diyorsunuz.

Söylediklerinizde bir çelişki var gibi.

Ayrıca öncelikle aşağıdaki konuyu okumalısınız.
Yapılmaması Gereken Ölümcül Hatalar
On current olayında yeni kayıt olup olmadığını kontrol ederek (newrecord)
TextBox'ların locked yani kilitleme özelliğini kod kısmında değiştirerek yaptım.

Kod:
Private Sub Form_Current()
    If Me.NewRecord Then
        Me.[KALIP TİPİ].Locked = False
        Me.[KALIP REFERANSI].Locked = False
        Me.[PARÇA REFERANSI].Locked = False
        Me.[PARÇA ADI].Locked = False
        Me.[KALIP DURUMU].Locked = False
        Me.[NE OLDU].Locked = False
        Me.[NE SORUN OLUŞTURUYOR].Locked = False
        Me.[NE ZAMAN OLDU].Locked = False
        Me.[NEREDE TESPİT EDİLDİ].Locked = False
        Me.[NASIL TESPİT EDİLDİ].Locked = False
        Me.[KİM TESPİT ETTİ].Locked = False
    Else
        Me.[KALIP TİPİ].Locked = True
        Me.[KALIP REFERANSI].Locked = True
        Me.[PARÇA REFERANSI].Locked = True
        Me.[PARÇA ADI].Locked = True
        Me.[KALIP DURUMU].Locked = True
        Me.[NE OLDU].Locked = True
        Me.[NE SORUN OLUŞTURUYOR].Locked = True
        Me.[NE ZAMAN OLDU].Locked = True
        Me.[NEREDE TESPİT EDİLDİ].Locked = True
        Me.[NASIL TESPİT EDİLDİ].Locked = True
        Me.[KİM TESPİT ETTİ].Locked = True
    End If
End Sub

.rar kalip-pres_Seruz.rar (Dosya Boyutu: 24,29 KB | İndirme Sayısı: 44)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
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
Cvp: form ta veri girişi yaptığım textbox kilitlensin - Yazar: Seruz - 10/06/2009, 11:12
Task