Simple CBL Checker

[=Peace=]

CBL Checker / Yea My Way
We Need : 1 Button , 1 Picture Box , 2 Labels , 1 Text Box
Name Label 1 : Player
Name Label 2 : Player's CBL
Code For Button1:
'

by =peace=
        PictureBox1.Hide()
        Dim Strings As String
        Dim wc As New WebClient

        Strings = wc.DownloadString("https://thecaconline.net/cbl/player/" + TextBox1.Text + ".html")
        wc.Dispose()
        If Strings.Contains("https://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

Enjoy Coded By =Peace= Thanks!
Put Credits ... Leechers