ForeColor是设置文本时的前景色。'当光标移到TextBox时文字设置为红色Private Sub Text1_GotFocus()
Text1.ForeColor = vbRedEnd Sub'当光标移出TextBox时文字设置为黑色Private Sub Text1_LostFocus()
Text1.ForeColor = vbBlackEnd Sub
以上代码只要将Text1.ForeColor改为Text1.BackColor即可改变TextBox的背景色。有时在使用textbox的时候，可把它的lock属性设为true,所有textbox里显示的内容都是在程序里控制设定的，这样的好处是利于控制，而且应用到password上，只要判断输入字符的多少，让文本框按数量显示星号，真正的输入仍然存在变量里，就比用textbox.passwordchar要好
