Bilgisayar Adının Alınması

Bu makalemizde bilgisayar adını öğreneceğiz. Aşağıdaki şekli inceleyin.

Şekil 1

Forma yazılacak kodlar:

Imports System

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        IPAddress()
    End Sub

Private Sub IPAddress()
     
        Dim LocalHostName As String
        Dim i As Integer
        LocalHostName = Net.Dns.GetHostName()
        Dim ipEnter As Net.IPHostEntry = Net.Dns.GetHostByName(LocalHostName)
               TextBox1.Text =
LocalHostName.ToString()

End Class

Bir sonraki makalemizde Bilgisayarın IP adresini öğrenme konusunu inceleyeğiz. Bir sonraki makalemizde görüşmek üzere...Bahadirsa