[İSTEK]Visual Basic Sürüm kontrol

TIKLA burdaki konun visual basic dilinde yazılmış tarzını verir misiniz

Try
System:
Net:
Dim _HttpWebRequest1 As HttpWebRequest = (safe_cast < 'TODO: Warning!!!! NULL EXPRESSION DETECTED...
)
Net:
Dim Greater As HttpWebRequest
Net:
HttpWebRequest:
Create("http://dwordteam.uhostall.com/update.txt")
System:
Net:
Dim _WebResponse1 As WebResponse
GetResponse
System:
IO:
Dim sr1 As StreamReader = gcnew
System:
IO:
StreamReader(_WebResponse1, -, Greater, GetResponseStream)
Dim newestversion1 As String
ReadToEnd
Dim currentversion1 As String
ProductVersion
Text = newestversion1
Catch ex As Exception
MessageBox:
Show("Network Error, Just Click Okey This is doesnt matter By DworD Hack Team 2014@@")
End Try
ifGreater(Text = "v1.0")
Unknown{Unknownelse{MessageBox:
:Show("Hile Kapat1lm1_t1r. Beendiysen Sat1n Al Birader")
thisGreaterClose
Unknown

fetp ile rahatlıkla yapılabiliyor iyi forumlar.