Question

vb.net 如何将多个方式获取的文本值赋值到一个文本框内

成功解决追加50啊！！！
现有四个个文本框TEXTBOX1、2、3、4.TEXT

我想将2、3、4中的文本值通过2、3、4合并的方式添加进TEXTBOX1。
比如：textbox2.text=00 textbox3.TEXT =02 textbox4.TEXT =0101 则最后我想要的是TEXTBOX1.text=00020101
是不是TEXTBOX1.text=textbox2.text & textbox3.TEXT & textbox3.TEXT
& 前后均有一个空格
但是现在特殊了2个，是因为是可变的。

TEXT3是COMBOBOX1中的DISPLAYMEMBER的值，这个我绑定了ACCESS数据库，如何获取其中我选择的DISPLAYMEMBER值。
Dim aa As String = COMBOBOX1.SelectedItem.ToString()
还是
Dim aa As String = COMBOBOX1.text

另外是由8个RADIOBUTTON组成的，他们的TEXT我都赋了唯一的值，想通过FOR EACH 语句判断那个选定了，然后将选定的值赋给TEXT4.text
语句如下：
Dim rbc As System.Windows.Forms.Control.ControlCollection = GroupBox1.Controls
For Each radioButton As Control In rbc
If (rbc Is radioButton) Then
Dim rb As RadioButton = DirectCast(radioButton, RadioButton)
If rb.Checked Then
TEXT4.Text = rb.Text
End If
End If
Next
但是为何最后的结果是这样下来TEXT4.TEXT的值是不对的。不是我想要的00020101

Answer 1

Private Sub RadioButton2_CheckedChanged(sender As Object, e As EventArgs) Handles _
RadioButton2.CheckedChanged, _
RadioButton1.CheckedChanged'8个radiobutton全加上
If CType(sender, RadioButton).Checked Then TextBox4.Text = CType(sender, RadioButton).Text
End Sub
Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged, TextBox3.TextChanged, TextBox4.TextChanged
TextBox1.Text = TextBox2.Text & TextBox3.Text & TextBox4.Text
End Sub
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
TextBox3.Text = ComboBox1.Text
End Sub