Skip to main content

AccessTr.neT


Kayıt Ekleme şartı

Kayıt Ekleme şartı

#2
Sub SifirsaKitle()

If Me.İs_No = 0 Then
fırkısıd.Enabled = False
[tbl_URUNGIRIS].Form![urunıd].Enabled = False
Else
fırkısıd.Enabled = True
[tbl_URUNGIRIS].Form![urunıd].Enabled = True
End If

End Sub

üstteki kodu urungiris formunun Vba sayfasına ekle,

formun açıldığında olayına ve İs_No metin kutusunun güncelleştirme sonrasında olayına
call SifirsaKitle
kodu ekle

kilitlenecek metin kutusu isimlerini SifirsaKitle koduna eklemelisin, fırkısıd ana form, urunıd altformdaki denetimin adıdır. Bu arada Türkçe karakter kullanımı ile ilgili bir şey söyleyemeyeceğim, uygulamanızın Türkçe karakterlerden dolayı gümlemesini bekliyorum.
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
Kayıt Ekleme şartı - Yazar: fascioğlu - 19/02/2016, 19:08
Cvp: Kayıt Ekleme şartı - Yazar: ozanakkaya - 19/02/2016, 19:33
Cvp: Kayıt Ekleme şartı - Yazar: fascioğlu - 19/02/2016, 19:42
Cvp: Kayıt Ekleme şartı - Yazar: fascioğlu - 20/02/2016, 02:17
Cvp: Kayıt Ekleme şartı - Yazar: atoz112 - 20/02/2016, 11:48
Cvp: Kayıt Ekleme şartı - Yazar: fascioğlu - 20/02/2016, 15:35
Cvp: Kayıt Ekleme şartı - Yazar: atoz112 - 20/02/2016, 16:42
Cvp: Kayıt Ekleme şartı - Yazar: atoz112 - 20/02/2016, 17:19
Cvp: Kayıt Ekleme şartı - Yazar: fascioğlu - 20/02/2016, 19:44
Cvp: Kayıt Ekleme şartı - Yazar: atoz112 - 20/02/2016, 19:53
Cvp: Kayıt Ekleme şartı - Yazar: fascioğlu - 21/02/2016, 00:35
Cvp: Kayıt Ekleme şartı - Yazar: atoz112 - 21/02/2016, 00:37
Cvp: Kayıt Ekleme şartı - Yazar: fascioğlu - 21/02/2016, 01:13