Assalammu'alaikum😊 Kali ini saya akan sharing ke teman-teman semua bagaimana cara membuat program sederhana dengan kombinasi parameter “Dialog Box” dan “Input Box” pada aplikasi
Visual Basic 6 yang merupakan lanjutan dari postingan saya sebelumnya di sini.
--------------------------------------------------------------
Langkah-Langkah Membuat Program Sederhana dengan Kombinasi Parameter Dialog Box dan Input Box pada Visual Basic 6
1. Bukalah aplikasi Visual Basic 6. Lalu,
buat New project dengan Standar EXE.
2. Desain form dengan menambahkan 3 Label, 3 Textbox, dan 2 Command Button.
3. Atur property Label, Textbox, dan Command Button seperti di bawah ini:
Object | Property | Value |
Label 1 | Caption | DATA DIRI |
Label 2 | Caption | Nama |
Label 3 | Caption | Alamat |
Text 1 | Text | - |
Text 2 | Text | - |
Command 1 | Caption | Simpan |
Command2 | Caption | Keluar
|
4. Double click salah satu Command Button,
kemudian masukan kode program di bawah ini:
Private Sub Command1_Click()
If Text1.Text = "" And Text2.Text = ""
Then
MsgBox "Nama dan Alamat Anda masih kosong",
vbInformation, "Pemberitahuan"
Else
If Text1.Text = "" Then
MsgBox "Nama Anda masih kosong", vbInformation,
"Pemberitahuan"
Else
If Text2.Text = "" Then
MsgBox "Alamat Anda masih kosong", vbInformation,
"Pemberitahuan"
Else
Email = InputBox("Masukan Email Anda, kami akan
mengirim data Anda melalui Email", "Wajib diisi!")
MsgBox "Data Anda sudah kami kirim Email ke " +
Email, vbInformation, "Pemberitahuan"
End If
End If
End If
End Sub
Private Sub Command2_Click()
inthasil = MsgBox("Yakin mau keluar?", vbQuestion
+ vbOKCancel, "Peringatan")
If inthasil = vbOK Then Unload Me
If inthasil = 1 Then Unload Me
End Sub
5. Jalankan programnya dengan klik F5 pada keyboard.
Jika Anda belum mengisi Nama dan Alamat, tapi langsung klik Simpan, maka akan muncul Dialog Box seperti dibawah ini:
Jika Anda telah mengisi Alamat, namun belum mengisi Nama Anda, tapi langsung klik Simpan, maka akan muncul Dialog Box seperti dibawah ini:
Jika Anda telah mengisi Nama, namun belum mengisi Alamat Anda, tapi langsung klik Simpan, maka akan muncul Dialog Box seperti dibawah ini:
Jika Anda sudah mengisi Nama dan Alamat, lalu klik Simpan, maka akan muncul Input Box seperti dibawah ini:
*Jika OK
*Jika CANCEL
Jika pada saat anda menjalankan program dan memilih Keluar, maka akan muncul Input Box seperti di bawah ini:
*OK (Maka akan keluar dari aplikasi)
*Cancel (Maka akan tetap berada diform aplikasi)
Komentar
Posting Komentar