我想知道如何创建一个类来更改表单内的每个文本框 BackColor。更加具体:
- 当文本框为空时,文本框背景颜色等于白色。
- 当文本框获得焦点时,文本框的背景颜色发生变化。
- 当文本框有任何文本时,文本框 BackColor 会发生变化。
- 当文本框失去焦点时,文本框的背景颜色发生变化。
目前,我正在这样做。
Private Sub tb_Login_Enter(sender As Object, e As EventArgs) Handles tb_Login.Enter
tb_Login.BackColor = Color.LightCyan
End Sub
Private Sub tb_Login_Leave(sender As Object, e As EventArgs) Handles tb_Login.Leave
If tb_Login.Text <> "" Then
tb_Login.BackColor = Color.LightGreen
Else
tb_Login.BackColor = Color.White
End If
但是,我的 from 中有很多 TextBox,那么,如何为它创建一个 Class 呢?
谢谢