03/02/2020, 09:55
Access Textbox Renklendırme Class Ile
1 2
03/02/2020, 12:01
feraz
03/02/2020, 18:52
ozanakkaya
Merhaba, koşullu biçimlendirme işleminin eklendiği örnek ektedir.
03/02/2020, 22:26
feraz
Sağolunuz @ozanakkaya hocam.
Hayret koşullu biçimlendirme olayı accesste alan odaklı olarak oluyormuş.
Öğrendiğimiz iyi oldu.
Class ile yapılan mesela 100 tane textbox felan olursa daha iyi bence.Koşullu biçimlendirmede tek tek yapmak gerekecek.
Ayrıyeten tektoxlara tıklamadan sadece üzerine gelince felan koşullu biçimlendirme olmuyor galiba.
Arşivime aldım
Hayret koşullu biçimlendirme olayı accesste alan odaklı olarak oluyormuş.
Öğrendiğimiz iyi oldu.
Class ile yapılan mesela 100 tane textbox felan olursa daha iyi bence.Koşullu biçimlendirmede tek tek yapmak gerekecek.
Ayrıyeten tektoxlara tıklamadan sadece üzerine gelince felan koşullu biçimlendirme olmuyor galiba.
Arşivime aldım
04/02/2020, 07:55
feraz
Sabah sabah kafa çalıştı
100 tane textbox olsa şöyle olabilir dihe düşünüyorum.
Formun load kod kısmına döngü ile textboxların renklerini koşullu biçimlendirme yapılabilir belki.Yani koşullu biçimlendirme kodu olmalı.
Böyle birşey excelde var bilmiyorum accestede varmı.
Akşama doğru biraz uğraşacağım buna olursa class olayına gerek yok bence.Tabii class olayı daha başka bir durum yerine göre.
Formun load kod kısmına döngü ile textboxların renklerini koşullu biçimlendirme yapılabilir belki.Yani koşullu biçimlendirme kodu olmalı.
Böyle birşey excelde var bilmiyorum accestede varmı.
Akşama doğru biraz uğraşacağım buna olursa class olayına gerek yok bence.Tabii class olayı daha başka bir durum yerine göre.
04/02/2020, 22:45
feraz
Kod ile tüm textboxlarda dolaşarak renklendiriyor.
if ile istenilen controls larda yapılabilir.
Belki faydalı olur insanlarımıza.
if ile istenilen controls larda yapılabilir.
Belki faydalı olur insanlarımıza.
Option Compare Database
Private Sub Form_Load()
With Form_Form1
For Each ctr In .Controls
If ctr.ControlType = acTextBox Then
ctr.FormatConditions.Delete
strCtr = ctr.Name
ctr.FormatConditions.Add (acFieldHasFocus)
With ctr.FormatConditions(0)
.BackColor = vbGreen
End With
End If
Next
End With
End Sub
1 2