Aşağıda ki vb6 kodlarını vb.nete ceviremedim yardım ederseniz sevinirim.

Alıntı:
Private strVersiyon As String

Private Sub Command1()
strVersiyon = inet1.OpenURL("http://siteadresi.com/version.php")
label1.Caption = strVersiyon
If label1.Caption "Guncel" Then MsgBox "Guncel Surumu İndiriniz.", vbExclamation, "Uyarı": End
End Sub

__________________