Metin Kutularına Girince Renkli ve Font Farklı Çıkınca

[karaayhan]

Metin Kutularına Girince Renkli ve Font Farklı Çıkınca eski halini alacak bir kod bilen var mı? Bekliyorum. :dua:

 

[Levent Menteşoğlu]

Aşağıdaki kodları deneyin.

[vb:1:a80c648bc9]Private Sub Metin0_Enter()
Metin0.BackColor = vbYellow
Metin0.FontItalic = True
Metin0.FontSize = 14
Metin0.FontBold = True
End Sub

Private Sub Metin0_Exit(Cancel As Integer)
Metin0.BackColor = vbWhite
Metin0.FontItalic = False
Metin0.FontSize = 10
Metin0.FontBold = False
End Sub
[/vb:1:a80c648bc9]

 

[karaayhan]

teşekkürler ilginize leventm, yalnız benim istediğim metin kutularının herbirine
girildiğinde, çıkıldığından gibi kodlar yazmak değil modül yazıp bütün formlardaki bütün alanlar için ortak bir kod yazmak bütün txt 'ler için

Yani böyle yapılmış bir program buldum fakat mde olduğu için kodlara erişemedim.
:yazici: ve bundan dolayı üzgünüm....
çok güzel programa renk katıyor. akıcı oluyor. Çözebilirsek sevinirim...
Þimdiden teşekkürler :hey:

 

[oduru]

BİÇİM menüsünden >koşullu biçimlendirme
yapabilirsin Alan odaklı komutu seçip renk verilebilir

 

[karaayhan]

oduru, helal olsun sana valla çok teşekkür ederim.
bu kadar basit olduğunu bilmiyordum. :kafa: başka sorunlarda görüşmek üzere teşekkürler.... :gidiyorum:

 

[oduru]

oduru, helal olsun sana valla çok teşekkür ederim.
bu kadar basit olduğunu bilmiyordum. :kafa: başka sorunlarda görüşmek üzere teşekkürler.... :gidiyorum:

görev efendim