- 日時: 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
|