C# と VB.NET の質問掲示板

■No59057 (ユルン さん) に返信
> SelectedTextの最後の反転というのは
このプロパティは、DropDownStyle が DropDownList の場合は使用されません。
DropDownStyle が DropDown の時に意味を持ってきます。

身近な所では、IE のアドレスバーが DropDown 形式の ComboBox になっています。
アドレスバーからは、ドロップダウンして過去の履歴を見ることもできますし、
TextBox のように URL を直接入力する事もできますよね。

そして、その TextBox 部の文字列をドラッグして反転させた時に、
反転選択されている文字列を調べるのが SelectedText です。
(SelectedText プロパティは、値の取得だけでなく代入操作も可能です)


> SelectedValueと
たとえば金融機関コードの場合、
　0001 → みずほ銀行
　0123 → 岩手銀行
　3210 → あさひかわ農業協同組合
のように、データを表す値が割り振られていますが、このような
「識別値」と「表示させるデータ」の組み合わせに対して使われます。


'--------------------------
' ComboBox と Label を 3 つずつ、それと Timer を貼っておいてください。
Public Class Form1

    Private tbl1, tbl2 As DataTable

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
        tbl1 = New DataTable()
        tbl1.Columns.Add("CODE")
        tbl1.Columns.Add("NAME")
        tbl1.Rows.Add("0001", "みずほ銀行")
        tbl1.Rows.Add("0123", "岩手銀行")
        tbl1.Rows.Add("3210", "あさひかわ農業協同組合")

        tbl2 = tbl1.Copy()

        'ドロップダウン コンボにバインド
        ComboBox1.DropDownStyle = ComboBoxStyle.DropDown
        ComboBox1.DataSource = tbl1
        ComboBox1.ValueMember = "CODE"
        ComboBox1.DisplayMember = "NAME"

        'ドロップダウン リストにバインド
        ComboBox2.DropDownStyle = ComboBoxStyle.DropDownList
        ComboBox2.DataSource = tbl2
        ComboBox2.ValueMember = "CODE"
        ComboBox2.DisplayMember = "NAME"

        'ドロップダウン コンボ(非連結)
        ComboBox3.DropDownStyle = ComboBoxStyle.DropDown
        ComboBox3.Items.Add("みずほ銀行")
        ComboBox3.Items.Add("岩手銀行")
        ComboBox3.Items.Add("あさひかわ農業協同組合")

        Timer1.Interval = 100
        Timer1.Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
        Label1.Text = "SelectedIndex=" & CStr(ComboBox1.SelectedIndex) & vbNewLine _
                    & "SelectedValue=" & CStr(ComboBox1.SelectedValue) & vbNewLine _
                    & "SelectedText=" & ComboBox1.SelectedText & vbNewLine _
                    & "SelectedItem=" & TypeName(ComboBox1.SelectedItem)

        Label2.Text = "SelectedIndex=" & CStr(ComboBox2.SelectedIndex) & vbNewLine _
                    & "SelectedValue=" & CStr(ComboBox2.SelectedValue) & vbNewLine _
                    & "SelectedText=" & ComboBox2.SelectedText & vbNewLine _
                    & "SelectedItem=" & TypeName(ComboBox2.SelectedItem)

        Label3.Text = "SelectedIndex=" & CStr(ComboBox3.SelectedIndex) & vbNewLine _
                    & "SelectedValue=" & CStr(ComboBox3.SelectedValue) & vbNewLine _
                    & "SelectedText=" & ComboBox3.SelectedText & vbNewLine _
                    & "SelectedItem=" & TypeName(ComboBox3.SelectedItem)
    End Sub
End Class