QUOTE(Martyr2 @ 11 Dec, 2007 - 03:16 PM)
If you need a label or textbox just to read the count you can do...
CODE
Private Sub xCountButton_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles xCountButton.Click
mylabel.text = xNamesListBox.Items.Count
End sub
If like your other example you are trying to print out the values of each item you can do...
CODE
Private Sub xCountButton_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles xCountButton.Click
Dim counter As Integer = 0
' Clear the label before starting
mylabel.Text = ""
' Move through the listbox items from 0 to the count - 1
For counter = 0 To xNamesListBox.Items.Count - 1
'Add onto the label the count and the items value
mylabel.Text &= "Item " & (counter + 1) & " is: " & xNamesListBox.Items(counter).ToString() & ControlChars.CrLf
Next
End sub
That should be all you need.
Enjoy!
"At DIC we be name listbox counting code ninjas!"
Thanks - you're quite expedient. But, using the first code required conversion to string so I did that, but nothing is displayed. Any clues?
CODE
Private Sub xCountButton_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles xCountButton.Click
Me.xNamesListBox.Text = CStr(Me.xNamesListBox.Items.Count)
End Sub
End Class
11 Dec, 2007 - 02:01 PM
| 