HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS

VB.NET 2003の開発でお困りのことはありませんか？
そんな悩みは当サイトで解決！！

HOME > VB.NET 2003 Tips > コントロール > ListView Tips メニュー

15.チェック項目のインデックスを取得する

UPDATE:2006/04/22 

<< 前のTips  次のTips >>

 

　ListViewに表示したチェックボックスのチェックされたインデックスを取得するにはCheckedItemsプロパティのIndexプロパティを使用します。

　
サンプル
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    '詳細表示にする
    ListView1.View = View.Details

    'ヘッダーを追加する（ヘッダー名、幅、アライメント）
    ListView1.Columns.Add("郵便番号", 100, HorizontalAlignment.Left)
    ListView1.Columns.Add("住所", 200, HorizontalAlignment.Left)
    ListView1.Columns.Add("氏名", 100, HorizontalAlignment.Left)

    Dim itemx1 As New ListViewItem
    Dim itemx2 As New ListViewItem

    'アイテムの作成
    itemx1.Text = "000-1234"
                
    'アイテムの追加
    itemx1.SubItems.Add("東京都杉並区12-345") 'サブアイテムの追加
    itemx1.SubItems.Add("HIRO's.NET")
        
    'サブアイテムの追加
    itemx2.Text = "111-5678"
                
    'アイテムの追加
    itemx2.SubItems.Add("東京都杉並区67-890") 'サブアイテムの追加
    itemx2.SubItems.Add("Japan CUP")
        
    'サブアイテムの追加

    'アイテムをリスビューに追加する
    ListView1.Items.Add(itemx1)
    ListView1.Items.Add(itemx2)

    'チェックボックスを表示する
    ListView1.CheckBoxes = True
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    'チェック項目が１つもない場合
    If ListView1.CheckedItems.Count = 0 Then
        '処理を抜ける
        Exit Sub
    End If

    'チェック項目のインデックスを取得する
    MessageBox.Show("チェック項目のインデックスは" & ListView1.CheckedItems(0).Index & "です")
End Sub
 

<< 前のTips  次のTips >>