Nah Untuk cara membuatnya yaitu, kita harus jalankan VB 6.0 pilih Standar Exe,,,,
Selanjutnya Silahkan tambahkan komponen CommandButton yang ada pada toolbox dan pada properties pilih "caption" Lalu Hapus Command1 dan gantikan dengan Tulisan Keluar....?
Sehingga Tampilannya Akan seperti berikut ini:
Setelah Form sudah didesain seperti gambar di atas, maka langkah selanjutnya kita akan memasukkan listing (code).
Caranya; klik 2 kali pada command Button lalu masukkan code berikut ini diantara Private Sub Command1_Click dan End Sub
If MsgBox("yakin ingin keluar aplikasi ?", vbYesNo + vbDefaultButton2 + vbQuestion, "Question") = vbYes Then
End
End If
Setelah Selesai menuliskan Listing, maka coba jalankan atau Run program yang telah anda buat lalu perhatikan hasilnya. Maka hasilnya akan seperti gambar dibawah ini, jika tidak ada kesalahan penulisan code..
Silahkan Anda Praktek dan Semoga Berhasil....
Husni Kaimuddin
Husni Kaimuddin
0 comments:
Post a Comment