Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 203
  • Last Modified:

List boxes

Hi,

I have a list box full if items. I want to have a button that will add a number to each of the items. I.e. the first item is given the number 1, the second 2 and so on. The number given must be added at the beginning.

Cheers

Darude :)
0
darude
Asked:
darude
1 Solution
 
AzraSoundCommented:
Private Sub Command1_Click()
    Dim i As Integer
    For i = 0 To List1.ListCount - 1
        List1.List(i) = (i + 1) & " " & List1.List(i)
    Next
End Sub
0
 
wsh2Commented:
<adding to Azra's very worthy comment>
Yikes.. better hope the List1.Sorted property is False.. <smile>.
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now