|
-
Aug 3rd, 2008, 02:48 PM
#1
Thread Starter
PowerPoster
[RESOLVED] How can I fix this code to stop repeating the text lines
Hey guys I have this code that loops my reg scanner.
Private Sub startscanregbutton_Click()
listreg.Clear
Text3.Text = Text3.Text & vbNewLine & "Scanning in progress...Please Wait.."
Dim ixz As Long
For ixz = 0 To List2.ListCount - 1
Text1.Text = List2.List(ixz)
Dim ix As Long
For ix = 0 To List2.ListCount - 1
SearchRegMachine List2.List(ix)
Next
Text3.Text = Text3.Text & vbNewLine & Text4.Text
Label3.Caption = str(listreg.ListCount) & " Possible Problematic Registry Keys"
Text4.Text = "Scanning Complete" & str(listreg.ListCount) & " Possible Problematic Registry Keys Detected."
Next
End Sub
so this is a loop, but in this loop, after each loop it reports on how many problems is found.
It loops through all the items in list 2, but I would only like it to report after the loop is done for good, as in when the list2 is all done.
Can anyone tell me how to do this ?
Thank you!!!!
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|