Private Delegate Function GetToolStripComboBoxTextInvoker() As String

Private Function GetToolStripComboBoxText() As String
    Dim text As String

    If Me.ToolStripComboBoxText1.Text.InvokeRequired Then
        text = CStr(Me.ToolStripComboBox1.Text.Invoke(New GetToolStripComboBoxTextInvoker(AddressOf GetToolStripComboBoxText)))
    Else
        text = Me.ToolStripComboBox1.Text
    End If

    Return text
End Function