TextBox -Veri-renk

[Yakut]

slm

textbox icinde veri varsa (herhangi yazi veya sayi)Textbox1,2.. arkayüz yesil renk, yoksa kirmiz renk yapilabilirmi ?




saygilar

 

[ozgretmen]

Aşağıdaki kodları dener misiniz ?

Private Sub TextBox1_Change()
If TextBox1.Value = "" Then
TextBox1.BackColor = &HC000&
Else
TextBox1.BackColor = &HFF&
End If
End Sub

Private Sub TextBox2_Change()
If TextBox1.Value = "" Then
TextBox2.BackColor = &HC000&
Else
TextBox2.BackColor = &HFF&
End If
End Sub

Private Sub UserForm_Initialize()
TextBox1.BackColor = &HC000&
TextBox2.BackColor = &HC000&
End Sub

 

[Yakut]

ogretmen, kodlar icin tesekkürler.

saygilar

 

[ozgretmen]

ogretmen, kodlar icin tesekkürler.
saygilar

Rica ederim.İyi çalışmalar...