textbox onfucus改變顏色

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles me.Load

        TextBox1.Attributes.Add("onfocus", "ChgBgColor(this,'Red')")

        TextBox1.Attributes.Add("onkeypress", "ChgTextColor(this,'Blue')")

    End Sub