Vraag : vang waarde van gecontroleerde punten in checklistbox

Hello, wil

I am de waarde van de gecontroleerde punten in een checklistbox in vb .NET (winforms) vangen.

My het vakje van de controlelijst de gegevens kijken als dit:
Value;   Display
23 Elmora
78 Sussex
89 Mountainside

If Elmora en Sussex wordt gecontroleerd ik wil vangen 23, en 78.

Thank u./>My code

bent
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:

Public SubFillChkListBox (ByVal pond als CheckedListBox, ByVal sql als Koord, ByVal ParameterName als Koord, ByVal ParameterValue als Koord)
        Het schemerige connetionString als Koord
        Schemerige verbinding als SqlConnection
        Schemerig bevel als SqlCommand

        Schemerige dt als DataTable

        Schemerige adapter als Nieuwe SqlDataAdapter
        'Schemerige ds als Nieuwe Dataset
        Schemerige I als Int32

        het connetionString = myCN

        verbinding = Nieuwe SqlConnection (het connetionString)

        Probeer
            verbinding. Open ()
            bevel = Nieuwe SqlCommand (sql, verbinding)
            command.CommandType = CommandType.StoredProcedure
            bevel. Parameters.AddWithValue (ParameterName.ToString, ParameterValue.ToString)

            dt = Nieuwe DataTable
            dt. Lading (command.ExecuteReader)

            adapter. Schik ()
            bevel. Schik ()
            verbinding. Sluit ()



            lb.DataSource = dt
            lb.DisplayMember = dt. Kolommen (1) .ColumnName
            lb.ValueMember = dt. Kolommen (0) .ColumnName




        Vangst ex als Uitzondering


        Het eind probeert

    Sub van het eind


    Privé SublblAddToList_Click (ByVal afzender als System.Object, ByVal e als System.EventArgs) behandelt lblAddToList.Click



        Voor Elk x in Me.chkBoxAvailable.CheckedIndices
'' Die Ik heb willen om de waarde vangen niet de tekst van elk gecontroleerd punt

            MsgBox (Me.chkBoxAvailable.Text.ToString)
            MsgBox (Me.chkBoxAvailable.SelectedValue.ToString)

        Daarna




    Sub van het eind

Antwoord : vang waarde van gecontroleerde punten in checklistbox

Probeer iets in die aard uit:
1:
2:
3:
4:
5:

    Privé SublblAddToList_Click (ByVal afzender als System.Object, ByVal e als System.EventArgs) Handvatten lblAddToList.Click
        Voor Elke drv als DataRowView in lb.CheckedItems
            Debug.Print (drv. Punt (lb.DisplayMember) & „ -->“ & drv. Punt (lb.ValueMember))
        Daarna
    Sub van het eind
Andere oplossingen  
 
programming4us programming4us