Sip, si tengo esa función y no veo que tenga ningun error. Esta es la función:
Sub Check_Clicked(sender As Object, e As EventArgs)
Dim i As Integer
Message.Text ="You selected: <ul>"
for i=0 To cbList.Items.Count -1
If cbList.Items(i).Selected Then
Message.Text &= "<li>" & cbList.Items(i).Text & "</li>"
End If
Next
Message.Text &= "</ul>"
End Sub
ya le kite el OnSelected... y tampoco se ven!!
Gracias!