Cara Membuat Menu Keluar Kembali Dan Total

 

 

Assalamualaikum teman teman program kita balik lagi di blog mimin "belajar programman" kali ini kita ngelanjutin sebuah tutorial membuat aplikasi dengan Visual Basic 6.0 ,oke yuk langsung kita lanjut... Gaaas

1.  Membuat menu keluar aplikasi,

Klik menu keluar, lalu isikan kode berikut :

Private Sub keluar_Click()

End
End Sub

2.  Membuat menu kembali Login

klik menu kembali login, lalu isikan kode berikut :

Private Sub login_Click()

Form2.Hide

Form1.Show

End Sub

3. Membuat Menu kembali  di form 3, tujuanya agar ketika di klik kembali ke Menu Utama (Form2), karena kemarin terlanjur tertiulis keluar ganti dulu Captionnya menjadi kembali

Double klik tombol menu Kembali, lalu isikan kode berikut :

Private Sub Command6_Click()

input_transaksi.Hide

Form2.Show

End Sub

4.  Membuat Menu Refresh  di form 3, tujuanya untuk mengosongkan seluruh isi Textbox setelah selesai diisi, untuk kita mulai menginput baru :

Double klik tombol menu Refresh , lalu isikan kode berikut :

Private Sub Command5_Click()

Label1 = ""

Text1 = ""

Text2 = ""

Text3 = ""

Text4 = ""

Text5 = ""

Text6 = ""

Text7 = ""

Text8 = ""

Text9 = ""

Text10 = ""

Text1.SetFocus

End Sub

Ketika di refresh textbox kosong kembali dan kursor focus ke textbox1.

5.  Membuat rumus menghitung  total, agar  ketika di klik tampil hasilnya,  caranya :

Karena kemarin kotak total terlanjur menggunakan Textbox,, sedangkan textbox adalah kotak yg harus diisi oleh pemakai, maka kita Hapus dulu Textbox Total, ganti dengan Label

Selanjutnya doubel klik label Total tersebut. Isikan kode berikut :

Private Sub Label1_Click()

Label1 = (Text8 * Text9) - Text10 

End Sub

 

Maka setelah menginput jumlah unit, harga dan cashback hasilnya adalah  seperti dibawah :

(untuk melihat hasil klik pada label)

Alhamdulillah materi ini sudah selesai mungkin sampai sini dulu yah nanti di lain hari kita lanjutin ,Thanks Assalamualaikum✋