I've coded an application which allows people to import a list of usernames, and check whether or not they are available on the website Habbo Hotel.
What I want to do though, is add a counter at the bottom (a Label), which displays the number of accounts that have been tested. This is a really simple task but I can't for the life of me work out how to do it, as I haven't coded anything for a long time..
Here is my current code:
Thanks.
What I want to do though, is add a counter at the bottom (a Label), which displays the number of accounts that have been tested. This is a really simple task but I can't for the life of me work out how to do it, as I haven't coded anything for a long time..
Here is my current code:
Code:
For Each fn As String In ListBox1.Items
Try
Dim myDatabuffer As Byte() = myWebClient.DownloadData("http://habbo.com/home/" & fn)
Dim download As String = Encoding.ASCII.GetString(myDatabuffer)
Catch Ex As Exception
RichTextBox1.AppendText((Chr(10) & fn))
End Try
Next
Label1.Text = "Done"
Thanks.