Cara Membuat Aplikasi Chatting Dengan VB 6.

Ian An Azhari
[Link]@[Link]

Abstrak

Visual basic merupakan bahasa pemrograman yang diciptakan oleh Microsoft dan
termasuk kedalam bahasa pemrograman tingkat tinggi. Visual basic digunakan dalam
pengembangan multimedia, WEB dan database. Pengolahan database dapat dijalankan
secara cepat karena Windows sendiri telah mendukung Visual basic dengan banyaknya
library yang disediakan.
Penulis memilih Visual basic 6.0 sebagai bahasa pemrograman pengembangan
perangkat lunak ini, karena kemampuan akses database dan akses hardware tidak
terlalu rumit, dikarenakan banyak vendor hardware merekomendasikan drivernya dalam
flatform Windows.
Kata Kunci: Visual Basic, Aplikasi Chatting

Pendahuluan
Chatting merupakan hal utama yang diperlukan diseluruh aplikasi sistem yang
terhubung dengan koneksi atau jaringan, dalam bentuk simpelnya seluruh bentuk
chatting identitasnya sama yaitu untuk berbicara secara tidak langsung dengan
seseorang yang sedang terhubung dengan internet. Tujuan dari tutorial ini sendiri yaitu
agar menambah ilmu dan inspirasi untuk mengembangkan aplikasi chatting yang telah
ada untuk saat ini.

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
Pembahasan
Microsoft Visual Basic 6.0 adalah suatu bahasa pemrograman yang dibuat oleh
Microsoft corp, yang bermarkas di Redmond New York. Bahasa pemrograman ini
berbasis bahasa basic. Visual Basic 6.0 ini bekerja dalam ruang lingkup MS. Windows.
Visual Basic ini termasuk bahasa pemrogaman berteknologi RAD, yaitu suatu teknologi
bahasa pemrograman yang dirancang untuk membuat aplikasi dengan mudah dan cepat.
Memilih Tipe Proyek
Pertama kali anda menjalankan IDE VB, anda diminta untuk memilih New Project. Ada
tiga tab pada new project yaitu sebagai berikut:
1. New . ada beberapa tipe proyek yang dapat anda bangun. Anda dapat memilih
tipe proyeknya sebagai berikut:
2. Existing, anda dapat memilih proyek yang sudah anda kerjakan sebelumnya
dan sudah disimpan didalam komputer.
3. Recent, VB menampilkan proyek-proyek sering anda gunakan.

Langkah awal untuk membuat aplikasi chatting dengan VB yaitu buka aplikasinya,
terlihat seperti gambar berikut :

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
Tampilan IDE
Dari ketiga tab itu pilihlah tab New, kemudian pilih lagi Standart EXE lalu klik tombol
Open. VB akan menampilkan IDE untuk anda.
Maka akan tampil layar seperti berikut ini :

Langkah selanjutnya akan kita perlukan adalah komponen Toolbox berikut ini :

1. Label Digunakan untuk menampilkan text yang tidak dapat dimodifikasi.

2. Command Button Kontrol ini ditampilkan dalam bentuk tombol di mana

terdapat sekumpulan perintah yang dapat diberikan untuk mengeksekusi suatu kejadian.

3. Textbox Digunakan untuk menampilkan text yang dapat dimodifikasi.

4. Winsock Komponen Winsock secara tidak langsung tidak tersedia di area

toolbox, maka kita akan menambahkannya sendiri kedalam komponen dengan
cara Klik Project – Components :lalu pada menu bar akan tampil jendela berikut
: Klik centang dan OK

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
Selanjutnya yaitu tahap penataan bentuk aplikasi chatting yang ingin dirangkai,
Contoh :

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
Tampilan di atas memiliki 4 buah komponen Label, 5 komponen Command Button, 5
komponen Textbox, dan 2 komponen Winsock.
Untuk mempermudah, silahkan ganti nama(name) dari setiap komponen tersebut. Nama
tersebut dapat diganti dengan mengklik komponen tersebut dan pada jendela properties
akan tampil baris (name).

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
Apabila tampilan selesai dibentuk maka langkah terakhir adalah menambakah listing
programnya seperti berikut :

Private Sub Connect_Click()

Winsock_client.Connect
End Sub
Private Sub Send_Click()
Winsock_client.SendData Winsock_server.LocalHostName & ” : ” &
[Link]
[Link] = [Link] & vbCrLf & [Link]
End Sub
Private Sub Disconnect_Click()
Winsock_server.Close
Winsock_client.Close
[Link] = “Disconnected”
[Link] = True
[Link] = True
End Sub
Private Sub Test_Click()
Winsock_server.LocalPort = [Link]
Winsock_server.Listen
End Sub
Private Sub OK_Click()
Winsock_client.RemoteHost = [Link]
Winsock_client.RemotePort = [Link]
End Sub
Private Sub Text1_gotfocus()
[Link] = “”

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
 End Sub
Private Sub Text2_gotfocus()
[Link] = “”
End Sub
Private Sub Text4_Click()
[Link] = “”
End Sub
Private Sub Winsock_client_Connect()
[Link] = “Status : Connected”
End Sub
Private Sub winsock_server_ConnectionRequest(ByVal requestID As Long)
Winsock_server.Close
Winsock_server.Accept requestID
End Sub
Private Sub winsock_server_DataArrival(ByVal bytesTotal As Long)
Dim chat As String
Winsock_server.GetData chat
[Link] = Winsock_server.LocalHostName & “:” & [Link] & vbCrLf &
chat
End Sub

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
Penutup
Visual basic adalah aplikasi pembuat program aplikasi dengan berbagai jenis kegunaan
dan kebutuhan yang bermacam macam dengan tampilan GUI (Grapical User Interface)
yang mudah untuk dipelajari namun membutuhkan waktu dan kemampuan yang cukup
untuk lanjut ketingkat yang selanjutnya.
Menurut penulis VB merupakan aplikasi interface yang nyaman untuk dipelajari dan
banyak tutorial yang bisa ditemukan sebagai media pembelajaran awal.

Referensi
[Link]

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]
Biografi
Nama saya Ian An Azhari hobi saat ini adalah bermain game
saya berasal dari Pagar Alam Sumsel. Melanjutkan kuliah di
Tangerang STMIK Raharja jurusan Teknih Informatika
dengan konsentrasi Software Engineering.
Facebook : [Link]

Lisensi Dokumen:
Copyright © 2008-2014 [Link]
Seluruh dokumen di [Link] dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial
(nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap
dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari [Link]