Dim Tb As WinForm.TextBox = e.Form.Controls("TextBox2") If Tb.Text = "立项设计" Then Tb.BackColor = Color.Green Tb.ForeColor = Color.Yellow Else If Tb.Text = "技术标书" Then Tb.BackColor = Color.Blue Tb.ForeColor = Color.White Else If Tb.Text = "" Then Tb.BackColor = Color.WhiteSmoke Tb.ForeColor = Color.Black End If End If End If