Cara Mengambil Alamat IP dan Nama Komputer Dengan VB.Net

Nama komputer yang di ambil ini dapat digunakan untuk digunakan sebagai author pada saat print out data, jadi kertas yang d print akan ketahuan dari komputer mana dia di print.

Berikut Kode untuk mengambil Nama Komputer dan IP addres pada VB.net.

Private Sub FormMenu_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Namakom, Ip As String
        Namakom = System.Net.Dns.GetHostName
        txtNama.Text = Namakom
        Ip = System.Net.Dns.GetHostByName(Namakom).AddressList(0).ToString
        txtIP.Text = Ip
    End Sub