VB.net ile IP Adresini Öğrenme

Bu dersimizde VB.net ile ip adresini çekelim.

Bu dersimizde VB.net ile ip adresini çekelim.

Şu fonksiyonu tanımlayalım:


Imports System.Net

Imports System.Text.RegularExpressions

kütüphaneye ekliyoruz


Private Function GetIP() As String

        Dim wc As New WebClient()

        Dim strIP As String = wc.DownloadString("http://checkip.dyndns.org")

        strIP = (New Regex("\b\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\b")).Match(strIP).Value

        wc.Dispose()

        Return strIP

    End Function



Buton click olayına şu kodları girelim:


Label1.Text = (GetIP())

  • Etiketler;
Yorum Yaz

Yorum yazabilmek için üye girişi yapmanız gerekiyor!

Yukarı Git