'フォームにコンボボックスを貼り付けてください。


        'ComboBox1.Items.Clear() '登録されているアイテムの消去

        ComboBox1.Text = "初期表示テキスト"

        ComboBox1.Items.Add("1です") 'アイテムを追加
        ComboBox1.Items.Add("2です")
        ComboBox1.Items.Add("3です")
        ComboBox1.Items.Add("4です")
        ComboBox1.Items.Add("5です")

        'コンボボックスのアイテムを検索できます
        'If Not (ComboBox1.FindString("1です") = -1) Then MsgBox("1です は存在します")

        '０から始まるアイテムのテキストを取り出します
        Debug.WriteLine(ComboBox1.GetItemText(ComboBox1.Items(2)))

        '登録されているアイテムの数
        Debug.WriteLine(ComboBox1.Items.Count())




▼テキスト部分を編集できないようにする


        ComboBox1.Items.Add("1です") 'アイテムを追加
        ComboBox1.Items.Add("2です")
        ComboBox1.Items.Add("3です")
        ComboBox1.Items.Add("4です")
        ComboBox1.Items.Add("5です")

        'ComboBox のスタイルを指定します
        ComboBox1.DropDownStyle = ComboBoxStyle.DropDownList
        '先頭のアイテムを表示させる
        ComboBox1.Text = ComboBox1.GetItemText(ComboBox1.Items(0))