|
■No60903 (やんまー さん) に返信
> セットもできるように見えます。
セットはできますよ。Azulean さんも「選択するものを指定する」と書かれていますよね。
Public Class Form1
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
ListBox1.Items.Add("ああああ")
ListBox1.Items.Add("いいいい")
ListBox1.Items.Add("うううう")
ListBox1.Items.Add("ええええ")
ListBox1.Items.Add("おおおお")
'どれも選択されていない状態にする
ListBox1.SelectedIndex = -1
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
'三番目の「うううう」を選択する
ListBox1.SelectedItem = "うううう"
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click
'どの項目が選択されているのかを取得する
Label1.Text = String.Format("SelectedIndex={0}, SelectedItem={1}", _
ListBox1.SelectedIndex, ListBox1.SelectedItem)
End Sub
End Class
|