Formda metin kutusu eklensin, ama silinmesin, değiştirilmesin.
Tarih
19/01/2014 14:02
Konu Sahibi
abahceci
Yorumlar
4
Okunma
1015
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



abahceci
Aktif Üye
Kullanici Avatari
Aktif Üye
A.... B....
203
12/05/2010
0
Ofis 2010
24/07/2016,17:33
Çözüldü 
Sponsor Reklam
Arkadaşlar merhaba,
Bir formda var olan metin kutularındaki verilerin form kapandıktan sonra tekrar o form açıldığında o verinin değiştirilmesini, silinmesini istemiyorum. Ancak aynı kayıt içinde başka bir metin kutusuna (boş ise) veri girilebilsin istiyorum. Bunu yetkilendirme ile sağlamaya çalıştım. Ama bir türlü yapamadım. Ekteki dosyada yetkilendirme yok. Başka türlü nasıl yapabilirim?
Şimdiden çok teşekkür ederim...


Ek Dosyalar
.rar   METİN KUTUSU DEĞİŞMESİN.rar (Dosya Boyutu: 40,14 KB / İndirme Sayısı: 9)
abahceci, 12-05-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla

serdar_20
Uzman
Kullanici Avatari
Uzman
S....
188
03/12/2011
52
Erzurum
Memur
Ofis 2007
30/11/2016,17:43
Çözüldü 
Merhabalar;
Silinmesini istemediğiniz metin kutularının odaklandığında olayını aşağıdaki gibi yaparsanız sanırım istediğiniz olur.

Visual Basic Code
1
2
3
4
5
6
7
Private Sub Metin20_GotFocus()
If IsNull(Me.Metin20) Then
Me.Metin20.Locked = False
Else
Me.Metin20.Locked = True
End If
End Sub


Cevapla

abahceci
Aktif Üye
Kullanici Avatari
Aktif Üye
A.... B....
203
12/05/2010
0
Ofis 2010
24/07/2016,17:33
Çözüldü 
Sponsor Reklam
Sayın serdar_20 hocam, cevabınız için çok teşekkür ederim. Yazdığınız kodu denedim ve istediğim gibi oldu. Ancak ne var ki; bu özelliği kullanmayı düşündüğüm birkaç formum ve her bir formda da birçok metin kutum var. Bu durumda her formdaki her bir metin kutusu için ayrı ayrı mı bu kodu yazmalıyım? Yoksa daha pratik bir yolu var mı?
İlginizden dolayı tekrar teşekkür ederim...
abahceci, 12-05-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Taruz
Aktif Üye
Kullanici Avatari
Aktif Üye
104
4
04/10/2009
20
Belirtilmemiş
Belirtilmemiş
10/06/2014,13:15
Çözüldü 
Merhaba..

Sayın serdar_20'in önerisine ilaveten;

Bunu en kısayolu döngü ile tüm kontrolleri kontrol ettirmek olur..

Forumunuzun Geçerli Olduğunda kod bölümüne alttaki prosedürü uygularsanız (yeni kayıt değilse) veri girilmiş tüm metin kutuları ve açılan kutular kilitlenecektir..:

Dim trz As Control
For Each trz In Me.Controls
Select Case trz.ControlType
Case acTextBox, acComboBox
If IsNull(trz.Value) = 0 Then trz.Locked = -1 Else trz.Locked = 0
End Select
Next

Cevapla

abahceci
Aktif Üye
Kullanici Avatari
Aktif Üye
A.... B....
203
12/05/2010
0
Ofis 2010
24/07/2016,17:33
Çözüldü 
Sponsor Reklam
Taruz hocam, ellerinize sağlık. İstediğim gibi oldu.
Yalnız bir konuda daha yardımınızı isteyeceğim:
Herhangi bir denetim, başkası tarafından yanlış girilmişse ve ben onu düzeltmek istersem, tek bir butona tıklayarak bu özelliği devre dışı bırakabilir miyim?
Tabi form kapatılıp tekrar açıldıktan sonra yine eskisi gibi çalışmaya devam edecek şekilde...
Yardımınız için çok teşekkür ederim...

(Bu arada komutta If IsNull(trz.Value) = 0 önce hata verdi.
Sonra trz yerine herhangi bir denetim adı yazdıktan sonra düzeldi)
abahceci, 12-05-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  metin kutusuna girilen ilk karakterin silinmesi slayerrrrr 4 91 17/01/2017, 14:27 slayerrrrr
  Gelen sonuca göre otamatik metin yazdırma hknct 13 251 16/01/2017, 16:35 hknct
  Metin Kutusu Hk. Serkan Çevik 2 70 12/01/2017, 20:28 Serkan Çevik
  Raporda filtreleme onay kutusu ile nightashes 3 138 12/01/2017, 18:53 nightashes
  Liste kutusu filtreleme nightashes 2 81 11/01/2017, 18:14 nightashes


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya