Jumat, 06 Desember 2013
membuat aplikasi penjualan lewat vb6
MEMBUAT SENDIRI APLIKASI KASIR MENGGUNAKAN VISUAL BASIC 6
Kali ini saya akan berbagi bagaimana cara membuat sendiri aplikasi kasir dengan menggunakan visual basic 6.
Di bawah ini adalah cara membuat aplikasi kasir untuk rumah makan dan jika kamu ingin mendownload aplikasi beserta kodingnya silahkan download disini..
Langkah 1.
Buatlah desain tampilan aplikasi kasir seperti gambar di bawah :
Langkah 2.
Atur propertinya sebagai berikut :
Langkah 3.
Menuliskan source code sesuai dengan fungsinya masing-masing.
Klik 2x Timer1 dan copas kode di bawah :
Klik 2x txtId.text dan isi kode berikut :
Klik 2x txtPesanan.text dan isi kode seperti di bawah :
Klik 2x txtBayar.text dan copas source code berikut :
Klik 2x cmdBaru, isi dengan kode berikut :
Klik 2x cmdTutup, isi dengan kode berikut :
hasilnya seperti ini :
Demikian cara membuat Aplikasi Kasir sederhana semoga bermanfaat……
Di bawah ini adalah cara membuat aplikasi kasir untuk rumah makan dan jika kamu ingin mendownload aplikasi beserta kodingnya silahkan download disini..
Langkah 1.
Buatlah desain tampilan aplikasi kasir seperti gambar di bawah :
Langkah 2.
Atur propertinya sebagai berikut :
| 1 | Name : lblTanggal | Caption : - |
| 2 | Name : lblJam | Caption : - |
| 3 | Name : txtId | Text : - |
| 4 | Name : txtMenu | Text : - |
| 5 | Name : txtSatuan | Text : - |
| 6 | Name : txtHarga | Text : - |
| 7 | Name : txtPesanan | Text : - |
| 8 | Name : txtTotal | Text : - |
| 9 | Name : txtBayar | Text : - |
| 10 | Name : txtKembali | Text : - |
| 11 | Name : cmdBaru | Caption : Menu Baru |
| 12 | Name : cmdTutup | Caption : Tutup |
| 13 | Name : Timer1 | Interval : 1 |
Menuliskan source code sesuai dengan fungsinya masing-masing.
Klik 2x Timer1 dan copas kode di bawah :
1: Private Sub Timer1_Timer()
2: lblTanggal.Caption = Format(Date, "dd mmmm yyyy")
3: lblJam.Caption = Format(Time, "hh:mm:ss")
4: End Sub
Klik 2x txtId.text dan isi kode berikut :
1: Private Sub txtId_KeyPress(KeyAscii As Integer)
2: If KeyAscii = 13 Then
3: If txtId.Text = 101 Then
4: txtMenu.Text = "Sate Kambing"
5: txtSatuan.Text = "Porsi"
6: txtHarga.Text = 15000
7:
8: ElseIf txtId.Text = 102 Then
9: txtMenu.Text = "Gulai"
10: txtSatuan.Text = "Porsi"
11: txtHarga.Text = 10000
12:
13: ElseIf txtId.Text = 103 Then
14: txtMenu.Text = "Soto Ayam"
15: txtSatuan.Text = "Porsi"
16: txtHarga.Text = 17000
17:
18: ElseIf txtId.Text = 104 Then
19: txtMenu.Text = "Coto Makasar"
20: txtSatuan.Text = "Porsi"
21: txtHarga.Text = 20000
22:
23: Else
24: MsgBox ("Menu yang dipesan belum ada...!")
25: End If
26: txtPesanan.SetFocus
27:
28: End If
29: End Sub
Klik 2x txtPesanan.text dan isi kode seperti di bawah :
1: Private Sub txtPesanan_Change()
2: txtTotal.Text = Val(txtHarga.Text) * Val(txtPesanan.Text)
3: End Sub
Klik 2x txtBayar.text dan copas source code berikut :
1: Private Sub txtBayar_Change()
2: txtKembali.Text = Val(txtBayar.Text) - Val(txtTotal.Text)
3: End Sub
Klik 2x cmdBaru, isi dengan kode berikut :
1: Private Sub cmdBaru_Click()
2: txtId.Text = ""
3: txtMenu.Text = ""
4: txtSatuan.Text = ""
5: txtHarga.Text = ""
6: txtPesanan.Text = ""
7: txtTotal.Text = ""
8: txtBayar.Text = ""
9: txtKembali.Text = ""
10:
11: txtId.SetFocus
12: End Sub
Klik 2x cmdTutup, isi dengan kode berikut :
1: Private Sub cmdTutup_Click()
2: Unload Me
3: End Sub
hasilnya seperti ini :
Demikian cara membuat Aplikasi Kasir sederhana semoga bermanfaat……
Technorati Tags: contoh program vb6,contoh fungsi di vb6,cara penggunaan fungsi vb,tutorial vb6,download tutorial vb6,vb6 tutorial download,dasar dasar vb6,belajar vb6,cara mudah belajar vb6,vb6 artikel download,vb6 blog,artikel vb6,semua tentang vb6,vb6 api,cara menggunakan module,cara menggunakan class module
Related Posts
Recent Comments
Subscribe & Follow
Popular Posts
Copyright © 2012 cuma ingin berbagi.
membuat web browser pakai vb 6
Cara Membuat Web Browser Dengan Menggunakan Visual Basic 6.0
Posted by kun AkinariSyarat membuat Web Browser :
1. Sediakan Makanan Ringan
2. Kopi dan Rokok
3. Dengerin Musik... klo bisa Iwan Fals :)
4. Harus punya VB6 , Full maupun Portable. Kalo belum punya Visual Basic 6, bisa Cari di Indowebster.
Langkah2 membuat Web Browser ala Yudhistira Mawardi :
1. Buka Visual Basic 6 nya. Trus pilih Standard EXE.
2. Klik Kanan Pada ToolBox, Kemudian pilih Components atau tekan key Ctrl + T .
3. Kemudian Centang Microsoft html object library, Microsoft internet controls, Microsoft Windows common Controls 5.0 atau 6.0 sama saja.
4. Buat 5 Command Buton, 1 Text Box , 1Label, 1 Webbrowser , 1 Proggress Bar. Saran saya tata Seperti Gambar di bawah.
CommandButton Captionnya saya ganti dengan Back, Forward, Refresh, Stop dan Go.
Label Captionnya saya ganti Done
TextBox Text kalau bisa Kosong aja.
5. Sekarang Masukkan kode kode berikut, caranya doble klik pada tool / tombol yang sudah kita buat.
1. Back
On Error Resume Next
WebBrowser1.GoBack
2. Forward
On Error Resume Next
WebBrowser1.GoForward
3.Refresh
On Error Resume Next
WebBrowser1.Refresh
4.Stop
On Error Resume Next
WebBrowser1.Stop
5.GO
On Error Resume Next
WebBrowser1.Navigate Text1.Text
6. Progress Bar. Langsung Copy dan Paste Code ini pada Form Code
Private Sub WebBrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
On Error Resume Next
If Progress = -1 Then ProgressBar1.Value = 100
Label1.Caption = "Done"
ProgressBar1.Visible = False
If Progress > 0 And ProgressMax > 0 Then
ProgressBar1.Visible = True
Image1.Visible = False
ProgressBar1.Value = Progress * 100 / ProgressMax
Label1.Caption = "Loading " & Int(Progress * 100 / ProgressMax) & "%"
End If
Exit Sub
End Sub
8.Resize Form. Langsung Copy dan Paste Code ini pada Form Code
Private Sub Form_Resize()
On Error Resume Next
WebBrowser1.Width = Me.ScaleWidth
WebBrowser1.Height = Me.ScaleHeight - 1680
End Sub
6. Coba Jalankan Programnya Run > Start atau F5. Bila anda menemui error Silahkah komen, pasti ane jawab :)
7. Kalau sudah tak tampak error. Langsung pilih File > Make Project1.exe.
8. Finish ^^
Kalau Program sudah jadi akan terlihat seperti ini :
tutorial visual basic 6
Pilih Penggunaan Bahasa
Diberdayakan oleh 
Terjemahan
TerjemahanThursday, May 16, 2013
Tutorial Dasar Dasar Program Visual Basic 6.0
Artikel kali ini adalah lanjutan dari artikel sebelumnya pada kategori Visual Basic,
Sampul ilmu akan menjelaskan tentang Dasar Dasar Program Visual Basic
6.0, Visual Basic adalah bahasa pemrograman yang sangat mudah untuk
dipelajari, dengan teknik pemrograman visual yang memungkinkan user
untuk dapat berkreasi lebih baik dalam membuat suatu program
aplikasi..adapun komponen-komponen yang digunakan dalam pembelajaran
kali ini adalah Label, TexBox, ComboBox, DTpicker, CommandButton,
OptionButton
Langkah-Langkah Pembuatanya Adalah Sebagai Berikut
- Buka Project Yang telah dibuat sebelumnya, untuk caranya anda dapat membaca Cara Mengkoneksikan Database Accsess Di Visual Basic 6.0 setelah koneksi database telah selesai selanjutnya silahkan baca Tutorial Cara Membuat Menu Utama Di Visual Basic.
- Buat Form Baru dengan cara Pada Toolbar Clik AddForm >> Form
- Pada Project Expoler (Properties) Ubah Name Menjadi FrmInputData
- Pada ToolBox Click Label Kemudian Drag Dihalaman Kerja Anda (FrmInputData) Dihalaman Project Expoler (Properties) Ubah Caption Menjadi Nama
- Selanjutnya Sama Seperti Langkah Diatas Buat Label Tanggal Lahir, Jenis Kelamin Dan Agama
- Untuk Membuat Texbox caranya Pada ToolBox Clik TextBox (ab) Drag Dihalaman Kerja Anda (FrmInputData) Tepat Disamping Label Nama
- Untuk Membuat Tanggal Caranya Pada menu Clik Project Kemudian Pilih Components… Atau Dapat Juga Dengan Cara Ctrl+T pada halaman components Centang Microsoft Windows Common Controls. 2.6.0 kemudian Ok
- Pada ToolBox Clik DTPicker Drag Dihalaman Kerja Anda (FrmInputData) Tepat Disamping Label Tanggal Lahir
- Pada ToolBox Clik OptionButton Drag Dihalaman Kerja Anda (FrmInputData) Tepat Disamping Label Jenis Kelamin. Disini anda menggunakan 2 OptionButton Dihalaman Project Expoler (Properties) Ubah Caption Option1 Menjadi Laki-Laki Dan Option2 Menjadi Perempuan
- Selanjutnya Pada ToolBox Clik ComboBox Drag Dihalaman Kerja Anda (FrmInputData) Tepat Disamping Label Agama, Untuk Mengisi Data Agama Pada ComboBox Caranya Pada Project Expoler (Properties) Pilih List Kemudian Isikan Data-Data Berikut, Islam, Protestan, Khatolik, Hindu, Budha.
- Sebelum Anda Menjalankan Program Tersebut terlebih dahulu click Form MenuUtama Kemudian Pilih File >> Input Data
- Setelah Muncul Jendela Project1-MenuUtama (Code) Masukkan Kode Dibawah Ini
Private Sub inpData_Click()Untuk Melihat Hasilnya Pada ToolBar Click Start
FrmInputData.Show
End Sub
Download Tutorialnya Disini
Semoga Bermanfaat
Penulis : sampul ilmu
Anda telah membaca artikel tentang Tutorial Dasar Dasar Program Visual Basic 6.0.
Anda diperbolehkan mengcopy paste atau menyebar luaskan artikel ini,
namun jangan lupa untuk meletakkan link dibawah ini sebagai sumbernya.
@ Sampul Ilmu @
2 Comments
1 Comments
Artikel Terbaru
Cara Membuat Kolom atau Frame Di HTML19 Nov 20130 comments
Cara Mudah Membuat Lembar Kerja Portrait Dan Landscape Dalam satu file word21 Nov 20130 comments
Cara Membuat Rumus Pembulatan Angka Di Ms Excel22 Nov 20131 comments
Cara Mudah Membuat Query Di Microsoft Access22 Nov 20130 comments
Langganan:
Postingan (Atom)
4 comments:
Links to this post