A very small VB question

We are facing a small problem in VB might be any of you have its solution with you .

In one of our program we are using "Listview" to select certain things and we also have a delete button which deletes the selected items which we don't want to use.

With each item a value is also present hiddenly in it in messages and messageid array

Now let us suppose this case that there are 7 items in this list view and if someone chooses 3 items and press the delete button it should delete only those 3 items but in our code it is deleting 3 items out of which 1 or 2 are wrong , here is our delete button code

Here lstEmails is the name of the listview

and ncount is the total number of items present in this list

Private Sub cmdClear_Click()

Dim RIDs As New Collection

For i = 1 To nCount

If [login to view URL](i).Checked Then

ChangeStatus "Deleting : " & i

' Performing some programming tasks here ..

[login to view URL] i

End If

DoEvents

Next

If [login to view URL] > 0 Then

For i = 1 To [login to view URL]

[login to view URL] ([login to view URL](i))

nCount = nCount - 1

'[login to view URL](j) = [login to view URL](j + 1)

'[login to view URL](j) = [login to view URL](j + 1)

'/*********The above 2 lines are also causing errors that's why I had commented it , messageids and messages contains the object values ********/

Next

End If

[login to view URL]

End sub

If we use the remove item option in the first for loop only then it causes error so it is necessary to delete it seperately

## Deliverables

1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done.

2) Deliverables must be in ready-to-run condition, as follows (depending on the nature of the deliverables):

a) For web sites or other server-side deliverables intended to only ever exist in one place in the Buyer's environment--Deliverables must be installed by the Seller in ready-to-run condition in the Buyer's environment.

b) For all others including desktop software or software the buyer intends to distribute: A software installation package that will install the software in ready-to-run condition on the platform(s) specified in this bid request.

3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement).

## Platform

windows

Engineering MySQL PHP Software Architecture Software Testing Visual Basic

Project ID: #3258333

About the project