Using connection As New SqlConnection("connection string here")
connection.Open()
myComboBox.DisplayMember = "TABLE_NAME"
myComboBox.DataSource = connection.GetSchema("TABLES")
End Using
myComboBox.DataSource = connection.GetSchema("COLUMNS", New String() {Nothing, Nothing, "MyTable"})