CheckedListBox class question

[Mike Kim]

Hi all,

I've populated a checkedlistbox control with a dataset as follows:

chklstTasks.Dat aSource = dsTask.Tables(" Task").DefaultV iew
chklstTasks.Dis playMember = "header"
chklstTasks.Val ueMember = "task_id"

and in my button_click event, i would like to traverse the items in this
chklstTasks and if an item is
checked, i want to pop a message box to display "header" and "task_id" of
that item.

i tried as follow and got stuck. any help is appreciated. thanks in advance.

For i = 0 To chklstTasks.Che ckedItems.Count - 1
' how to i check if each item is checked and if check, what is the
task_id?

Next

[Mike Kim]

Hi Fergus,
Thanks much. That's exactly what i was looking for. It works !!

I have one more question:
i want to traverse the whole list using Items collection and check each
item with checkstate and do something based on their state. Can I still use
DataRowView?
How do I use CheckState? from which object?
I tried ..

For i = 0 To chklstTasks.Ite ms.Count - 1
drvTask = CType(chklstTas ks.Items(i), DataRowView)
' i want to do something like this ..
selec case drvTask.CheckSt ate
case 'unchecked
case ' checked
case ' intermediate
end select
Next

thanks again.
"Fergus Cooney" <wo****@tesco.n et> wrote in message
news:#x******** ******@TK2MSFTN GP10.phx.gbl...

Hi Mike,

chklstTasks.Ite ms contains the list of ALL the items in the list, while chklstTasks.Che ckedItems contains ONLY those which have been checked. So
your first task (get all the checked items) is done for you.

Each of the items in chklstTasks.Che ckedItems is a DataRowView, however it is stored as an Object type. So you'll need to assign each one to a
DataRowView in order to access it.

Then it's familiar stuff.

Dim drvTask As DataRowView
Dim sInfo As String

For I = 0 To chklstTasks.Che ckedItems.Count - 1
drvTask = chklstTasks.Che ckedItems (I)
sInfo = drvTask ("header") & ", " & drvTask ("task_id")
'Do something with sInfo
Next

Best wishes,
Fergus

[Fergus Cooney]

Howdy Mike,

One question - three question marks!!! - no problem :-)

Q. Can I still use DataRowView?
A. Yes, you can still use DataRowView. In fact, in your case, you must,
because that's what the items are. I note that in your code you are doing a
type conversion. Have you found that you need to? It worked fine when I did
it without:
drvTask = chklstTasks.Ite ms(i)
vs.
drvTask = CType (chklstTasks.It ems(i), DataRowView)
Q. How do you use CheckState? From which object?
A. Using chklstTasks.Get ItemCheckState( i)

Dim S as String = ""
Dim I As Integer
For I = 0 To chklstTasks.Ite ms.Count - 1
Select Case chklstTasks.Get ItemCheckState( i)
Case CheckState.Chec ked: S = S & "X"
Case CheckState.Inde terminate: S = S & "?"
Case CheckState.Unch ecked: S = S & "O"
End Select
Next
S = S: Stop

Regards,
Fergus