tagCANDY CGI VBレスキュー(花ちゃん) - VBレスキュー(花ちゃん)の投稿サンプル用掲示板 - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
VBレスキュー(花ちゃん)の投稿サンプル用掲示板
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
CheckedListBoxコントロールでチェックされた項目を取得(VB.NET) ( No.0 )  [親スレッドへ]
日時: 2009/11/02 23:22
名前: 花ちゃん

***********************************************************************************
* カテゴリー:[リストボックス][][]                                                *
* キーワード:選択項目を取得,全選択,選択解除,チェック項目,,                       *
***********************************************************************************
タイトル : CheckedListBox
記 事 No : 9253
投 稿 日 : 2009/08/10(Mon) 22:15
元質問者 : bin  

CheckedListBoxコントロールで下記についてお教えください。
  ・チェックされた項目を string変数に取得する方法
  ・チェックを全選択またはその逆をする方法

-----------------------------------------------------------------------------------
記事No : 9254
投稿日 : 2009/08/11(Tue) 10:15
回答者 : 魔界の仮面弁士  
-----------------------------------------------------------------------------------

> CheckedListBoxコントロールで下記についてお教えください。
>  ・チェックされた項目を string変数に取得する方法
Private Sub Button1_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button1.Click
   Dim q() As String = (From o In CheckedListBox1.CheckedItems Select CStr(o)).ToArray()
   'ListBox の場合
   'Dim q() As String = (From o In ListBox1.SelectedItems Select CStr(o)).ToArray()

   '確認用
   TextBox1.Lines = q    'TextBox1.Multiline = True にしておく
End Sub

※ 上記では、VB2005 での使用は、エラーが発生して使用できないようです。 -- By 花ちゃん --

>  ・チェックを全選択またはその逆をする方法
Private Sub Button1_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button1.Click
   Dim c As Boolean = True     '全選択なら True / 全解除なら False
   For i As Integer = 0 To CheckedListBox1.Items.Count - 1
      CheckedListBox1.SetItemChecked(i, c)
   Next
End Sub



 [スレッド一覧へ] [親スレッドへ]