Label1.Text = Split(TextBox1.Text, "=")(1)