حاتم مبروك قام بنشر مارس 22, 2021 مشاركة قام بنشر مارس 22, 2021 Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim wb As New Net.WebClient Dim url As String = "&url=" & Uri.EscapeDataString(TextBox1.Text)" Dim rsp As String Try rsp = wb.DownloadString("https://is.gd/create.php?format=simple"@url) TextBox2.Text = rsp End Try End Class رابط هذا التعليق شارك More sharing options...
مهند محسن قام بنشر مارس 22, 2021 مشاركة قام بنشر مارس 22, 2021 فين الملف ولا تبخل فى شرح طلبك حتى لا تبخل الأساتذة فى الرد عليك !!!!! رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.