admin
admin

شرح برمجة تشيكر ل‍ اي موقع بشكل مبسط vb net

29 Jan 2020
729
25

 للتواصل : INSTAGRAM : 0.4 KIK : 0.4 TELEGRAM : VVVVP ============الكود =========== Imports System.Net Public Class Form1 Dim web As WebClient …

 للتواصل :
INSTAGRAM : 0.4
KIK : 0.4
TELEGRAM : VVVVP

============الكود ===========

Imports System.Net

Public Class Form1
Dim web As WebClient = New WebClient
Dim html As String
Dim user As String
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
web = New WebClient
On Error Resume Next

user = TextBox1.Text

html = web.DownloadString(“http://ask.fm/” & user)

If html.Contains(“Page not found”) = True Then
MsgBox(“متاح”)
Else
MsgBox(“غير متاح”)
End If
End Sub
End Class

=======================

admin