none
有關checkedlistbox的問題 RRS feed

  • 問題

  • 各位大大你們好

    我想請教有關有關checkedlistbox的問題

    我在裡面建立10筆資料

    當我勾選時會在textbox顯示出來

    但是我想加入一個新的功能就是

    當我勾選1 2 3 筆的資料時顯示出來的字串後面要有一個ok的字串

    但是我對vb.net的不熟是否可以請各位大大教導一下

    下面是程式碼   請各位大大教導一下如何加進那行程式碼

    非常謝謝各位大大

     Do
                If CheckedListBox1.GetItemChecked(d) = True Then
                    c = c + CheckedListBox1.CheckedItems.Item(f) + "/"
                    f = f + 1
                End If
                If f = CheckedListBox1.CheckedItems.Count Then Exit Do
                d = d + 1
            Loop
            bb(9) = c
            c2 = ""
            f2 = 0
            d2 = 0
            Do
                If CheckedListBox2.GetItemChecked(d2) = True Then
                    c2 = c2 + CheckedListBox2.CheckedItems.Item(f2) + vbLf
                    f2 = f2 + 1
                End If
                If f2 = CheckedListBox2.CheckedItems.Count Then Exit Do
                d2 = d2 + 1
            Loop
            bb(10) = c2

    2008年6月30日 上午 02:15

解答

  • 因為CheckListBox是多選的控制項, 您可以在使用者選擇結束後, 按下畫面上的Button控制項, 於Button控制項的Click事件中執行前述的程式碼即可

     

    tihs

     

    2008年6月30日 上午 07:02

所有回覆

  • HI,

     

    您可以這樣做:

     

    Dim sb As New StringBuilder

    For Each obj As Object In CheckedListBox1.CheckedItems
        sb.Append(obj.ToString())
        sb.Append(vbCrLf)
    Next
    sb.Append("OK")
    TextBox1.Text = sb.ToString()

     

    tihs

     

    2008年6月30日 上午 03:59
  • 大大您好

    我找不到StringBuilder這樣的物件

    請問要用什麼樣的方法才可以得到

    2008年6月30日 上午 05:31
  • stringbulider已解

    請不用回覆

    謝謝大大

    2008年6月30日 上午 05:49
  • 大大

    我按照你的作法做結果有產生錯誤訊息

     Variable 'sb' is used before it has been assigned a value. A null reference exception could result at runtime. 

    這是他顯示的

    請大大指點迷津一下

    謝謝你

     

    我也忘了說明一個條件上面說勾選的為ok

    那麼沒勾選的顯示為no

    那要怎麼判斷

    2008年6月30日 上午 05:58
  • Variable 'sb' is used before it has been assigned a value. A null reference exception could result at runtime. 

    這問題我解掉了

    不過無法產生像大大說的那個情形

    2008年6月30日 上午 06:19
  • 沒勾選的要顯示NO可以先判斷CheckedListBox1.CheckedItems.Count是否為0, 是的話就

    sb.Append("NO"), 否則就執行原來的動作, 至於為什麼會看到上述的警告, 應該是您在某個判斷式中建立sb物件, 您可以將建立sb物件的動作移到程序的最前面即可

     

    tihs

    2008年6月30日 上午 06:23
  • 大大我補上了那段

    可是無法有顯示動作

    當我勾選了之後卻沒有顯示ok的字串

     

    例如

    我的checkedlistbox裡面的內容有aaa bbb ccc ddd eee

    當我勾選了aaa時

    在textbox裡會顯示aaa ok

    這樣的方式

    2008年6月30日 上午 06:36
  • 因為CheckListBox是多選的控制項, 您可以在使用者選擇結束後, 按下畫面上的Button控制項, 於Button控制項的Click事件中執行前述的程式碼即可

     

    tihs

     

    2008年6月30日 上午 07:02