Textbox text?

[starcraft]

how would i have VB romove text entered into a text box and load it into either another textbox or one of the label thins? on the click of a button. Ps. how do i change the text color in those textboxes or labels?

[dynamic_sysop]

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       With TextBox2
           .ForeColor = Color.Red '///set the text colour to red
           .Text = TextBox1.Text '/// add the text to the new textbox
       End With

       TextBox1.Text = "" '///clear the old textbox

   End Sub