(adsbygoogle = window.adsbygoogle || []).push({}); Dim totalLinks As Integer = ListBox1.Items.Count()
Dim i As Integer = 0

      For i < totalLinks

Dim request As HttpWebRequest = HttpWebRequest.Create("https://api.*******/api.php?key=" & TextBox1.Text & "&uid=" & TextBox2.Text & "&advert_type=int&domain=*******&url=" & ListBox1.Items(i))
Dim response As HttpWebResponse = request.GetResponse
Dim reader As New StreamReader(response.GetResponseStream)
Dim strings As String = reader.ReadToEnd
ListBox2.Items.Add(strings)


i keep getting an synax error on the CODED box of text i dont know what ive done wrong

~Thread moved to Computer Coding and Programming Questions

Please help me!

From what i gather your saying that

When i is smaller than the amount of items in your listbox is that right?

You probably want something like this.

    

        For i As Integer = 0 To totalLinks Step 1

           <o something>

        Next

This means starting from 0, until whatever totalLinks is, it'll do something and then increment i with 1 every time.

You may need to do totalLinks - 1 since its a listBox but whatever you can figure the rest out.