Tüm arkadaşlara iyi akşamlar dilerim.
Benim öğrenmek istediğim, bir form üzerinde bulunan metin kutusuna girdiğim değere göre nasıl form rengini değiştire bilirm. Koşullu Biçimleştirme olarak metin kutusu rengini değiştirdiğimiz gibi.
![Çözüldü](images/icons/cozuldu.png)
If Me.metin_kutusu_denetiminin_adi = "istenen_deger" Then
Me.Ayrıntı.BackColor = vbGreen
Else
Me.Ayrıntı.BackColor = vbWhite
End If
Select Case Me.A1
Case Is = 1
Me.Ayrıntı.BackColor = 16776960
Case Is = 2
Me.Ayrıntı.BackColor = 4210943
Case Is = 3
Me.Ayrıntı.BackColor = 5600139
Case Is = 4
Me.Ayrıntı.BackColor = 61046
Case Is = 5
Me.Ayrıntı.BackColor = 2193134
Case Is = 6
Me.Ayrıntı.BackColor = 1030655
Case Is = 7
Me.Ayrıntı.BackColor = 15612594
Case Is = 8
Me.Ayrıntı.BackColor = 6916969
Case Is = 9
Me.Ayrıntı.BackColor = 13474304
Case Is = 10
Me.Ayrıntı.BackColor = 2895086
End Select