Source Code Aplikasi Info Komputer & IP Address Menggunakan VB 6.0

Pada kesempatan kali ini Mycoding.net akan mengulas tentang , dengan judul artikel Source Code Aplikasi Info Komputer & IP Address Menggunakan VB 6.0.

Artikel Terkait Source Code VB6
Pada Tips n Trik VB 6.0 kali ini adalah Cara Memunculkan Info Computer Name IP Address Dengan VB 6.0

Coding Program Info Komputer & IP Address

Berikut Langkahnya :
Buka Aplikasi VB 6.0 anda
Design Form seperti gambar dibawah ini :
Design diatas terdapat :
Label1
Label2
Label3
Label4
Label5
Label6
Winsock1

Note :
Untuk mendapatkan Winsock1 anda bisa menambahkan Component Winsock terlebih dahulu :

Kemudian masukan Koding dibawah ini :
Private Const MAX_COMPUTERNAME_LENGTH As Long = 31
Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Private Sub Form_Load()
    Dim dwLen As Long
    Dim strString As String
    dwLen = MAX_COMPUTERNAME_LENGTH + 1
    strString = String(dwLen, "X")
    GetComputerName strString, dwLen
    strString = Left(strString, dwLen)
    Label4.Caption = "" & strString & ""
    Label5.Caption = "" & Winsock1.LocalHostName & ""
    Label6.Caption = "" & Winsock1.LocalIP & vbCrLf & ""
End Sub
dan Silahkan jalankan Aplikasi Vb 6.0 anda


Selain Sebagai Penyedia Panduan Belajar Database dan Tutorial Pemrograman, Kami Juga Membagikan Kumpulan Source Code Program Aplikasi dan Ebook Pemrograman Terlengkap yang Bisa Anda Dapatkan Secara Gratis di Halaman :

Rekomendasi Web Hosting
Hosting murah minimal order 1 bulan cuma 20rb. Gunakan voucher diskon 20%, kode voucher: MCPROJECT, total bayar hanya 16rb!!! Daftar sekarang