If IsNumeric(List1.List(0)) Then
uyenom = List1.List(0)
Else
'usernamein uyeidsini bul önce!
uyenom = twitter.uyeid_cek(List1.List(0))
End If

Yukardaki kod çağrısında aşağıdaki kısımda bazen hata veriyor.
Visual Basic 6 üzerinde olduğu için c# try catch fonksiyonu gibi birşey bulamadım. Bu konuda ücretsiz veya ücretli problemi çözebilecek birini aramaktayım. İstediğim şey, eğer herhangi bir hata olursa list1'deki o satırı atlayıp veya silip alttaki sıraya geçmesi işleme devam etmesi

Function uyeid_cek(username As String)
On Error Resume Next
Set WinHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1")
WinHttpReq.Open "GET", "https://www.twitter.com/" & username & "/", False
WinHttpReq.Send
mato = Split(WinHttpReq.responseText, """id"": """)
If UBound(mato) > 0 Then
If InStr(mato(1), """, """) Then
rato = Split(mato(1), """, """)
uyeid_cek = rato(0)
Else
uyeid_cek = 0
End If
End If
End Function