Source Coding Program Info Komputer & IP Address Menggunakan VB 6.0

Pada kesempatan ini kami akan mengulas tentang dengan judul artikel .

Artikel Terkait Source Code VB6 Lainnya
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 :

Penelusuran terkait Source Code VB6

Berlangganan artikel
Daftarkan e-mail Anda dibawah ini
Selanjutnya cek e-mail untuk verifikasi.
Kategori Terpopuler

0/Posting Komentar/Komentar

Lebih baru Lebih lama