Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        AddHandler ToolStripComboBox1.TextChanged, AddressOf _
        ToolStripComboBox1_TextChanged
    End Sub
 
    Private Sub ToolStripComboBox1_TextChanged(ByVal sender As Object, ByVal e _
      As System.EventArgs)
        ToolStripTextBox1.Text = DirectCast(sender, ToolStripComboBox).Text
    End Sub

#######
ICQ: 192-576-074
http://codinglukas.co.funpic.de/

Wer fragt ist ein Narr - f?r 5 Minuten.
Wer nicht fragt ist ein Narr - sein Leben lang.
Quarks&Co