by =peace=
PictureBox1.Hide()
Dim Strings As String
Dim wc As New WebClient
Strings = wc.DownloadString("http://thecaconline.net/cbl/player/" + TextBox1.Text + ".html")
wc.Dispose()
If Strings.Contains("http://thecaconline.net/cbl/images/dirty.png") Then
'PLAYER IS CBL DIRTY
PictureBox1.Show()
Return
Else
'PLAYER IS CBL CLEAN
PictureBox2.Show()
PictureBox1.Hide()
Return
End If
End Sub

doesn't work 

