Pages

Text

Total Pageviews

Ads 468x60px

Pengikut

Mengenai Saya

Foto Saya
ricojonly
duri, riau, Indonesia
ngmg apa adanya,orngnya jelex... tapi ramah tamah ama sapa aja....
Lihat profil lengkapku

Search This Blog

Featured Posts

Popular Posts

Senin, 03 Oktober 2011

contoh dasar vb6.0

Contoh Dasar Visual Basic 6.0

Kali ini saya akan memberikan sedikit informasi tentang perintah dasar vb 6.0.
Untuk memulai silahkan buka program vb 6.0 nya, jika sudah buatlah form seperti berikut :













Dengan ketentuan form Sebagai berikut :
ObjectNameCaption
label1 label1 Nama
label2 label2 Alamat
text1 Tnama (kosongkan)
text2 Talamat (Kosongkan)
command1 CView View
Command2 Cexit exit

Ketikan kode listing berikut :

Private Sub Cexit_Click()
pesan = MsgBox("Yakin Keluar Aplikasi??", vbQuestion + vbOKCancel, "Keluar")
If pesan = vbOK Then
End
End If
End Sub

Private Sub Cview_Click()
MsgBox "Nama Anda Adalah :" + Tnama
MsgBox "Alamat Anda Adalah :" + Talamat
End Sub

Jika form dijalankan maka hasilnya akan seperti berikut


Tombol View berfungsi untuk melihat hasil dari tampilan yang di input


Jika tombol keluar di klik maka akan tampil pesan sebagai berikut


Itulah contoh VB 6.0 yang saya bagikan hari ini..
Semoga bermanfaat.

0 komentar:

Posting Komentar