Question

vb中点击窗体文本框颜色就变换的代码怎么写

Answer 1

Private Sub Text1_GotFocus()
Text1.BackColor = &HC0C0FF '光标在文本框时变色
End Sub
Private Sub Text1_LostFocus()
Text1.BackColor = &HFFFFFF '光标不在文本框时还原白色
End Sub

Answer 2

有字体颜色这个 属性的， =vbred 就会变成红色了