AccessTr.neT

Tam Versiyon: Metin Kutusu Tıklandığında Olayına Kod İle " X" Yazdırmak İstiyorum
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Merhaba,ekte bulunan örnek üzerinde 4 adet metin kutumuz var.Bu metin kutularının herbirisi için Maus ile üzerine gelip "Tıkladığında ya da Çift Tıklandığında " metin kutuları içine X  (diğer bir deyişle tabloda ilgili alana  X 'i  ) nasıl yazdırırız .

Normalde bunu klavye ile X yazarak hallediyoruz ama oyalayıcı oluyor,doğrudan maus ile daha hızlı olabileceğini düşünüyoruz.Şimdiden teşekkür ederiz.
metin kutusunun click/tıklandığında olayına
ActiveControl = "x"
yazınca oluyor ama bunu her metin kutusu için yapmalısınız

yada doğrudan her metin kutusu için
me.metinkurusu1="x"
gibi bir ifade kullanırsınız
Yazmak için tıklandığında olayına  ActiveControl = "X"  yazınca çok güzel oldu.
Yazılanı silmek(X i silmek için ) için  çift tıklandığında kod olarak ne yazmalıyız?
(21/11/2018, 22:14)alimadam yazdı: [ -> ]Yazılanı silmek(X i silmek için ) için  çift tıklandığında kod olarak ne yazmalıyız?
If ActiveControl = "x" Then ActiveControl = Null
If ActiveControl = Null Then ActiveControl = "x"
 az önceki kod yerine bunu yazarsanız boş ise x koyar x ise boşaltır
haliliyas vermiş olduğunuz kod ile X evet siliniyor ama nedense boş (null) olduğunda X yazılmıyor.
Yazmak için Tıklandığında olayına : ActiveControl = "X"

Silmek İçin Çift tıklandığında olayına : If ActiveControl = "X" Then ActiveControl = Null     yazınca istediğim oldu, teşekkür ediyorum.