Como criar um ComboBox em tempo de execução e adicioná-lo ao formulário

'Este exemplo mostra como criar um ComboBox em tempo
'de execução e adicioná-lo ao formulário

Public Class Form1
  Private Sub Button1_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button1.Click

    Dim combo As ComboBox = New ComboBox() 'declara o combobox
    combo.Size = New Size(100, 23) 'define o tamanho
    combo.Location = New Point(150, 150) 'define a localização

    'adiciona itens no combo
    combo.Items.Add("Visual Basic")
    combo.Items.Add("C#")
    combo.Items.Add("Java")
    combo.Items.Add("Delphi")
    combo.Items.Add("JavaScript")

    Me.Controls.Add(combo) 'adiciona o combo ao form

  End Sub
End Class