Membuat Menu dan Modul pada Visual Basic

Materi 1. Membuat Program Aplikasi Penjualan Barang pada VB dengan Mysql
Membut Menu dan Modul
Ahmad Rizal Abidin, M.Kom

Dalam membuat program aplikasi dengan VB dan Mysql hal yang perlu disiapkan adalah :
Instalasi Mysql pada computer, install MyODBC dan memahami dasar-dasar perintah SQL Lihat pada kategori Basis Data

a. Mangaktifkan VB 6.0, dengan cara klik start, Klik Microsoft Visual Studio 6.0 dan klik Microsoft Visual Basic 6.0.
b. Setelah tampil Windows Projects, pilih atau double klik VB Interprise Edition Co…, dengan demikian project siap untuk digunakan
c. Perintah selanjutnya kita menambahkan form sesuai dengan form yang akan dibuat yaitu : Frm_menu, Frm_Kategori, Frm_Produk, Frm_Pelanggan, dan Frm Transaksi, caranya yaitu : Klik menu Project, Klik Add Form, dan Klik Open, dengan demikian akan terbuat dua buah form pada windows project, lanjutkan perintah menambah form sehingga akan terbuat 5 buah form.
d. Double klik form1 pada window project, klik Name pada properties, lalu ganti form1, dengan Frm_menu, ganti semua name form sesuai dengan nama form diatas.
Gambar 1. form yang akan dibuat

e. Simpan semua form dan project yang telah dibuat dengan cara klik Save project gambar disket pada menu bar, lalu klik tombol Savev sampai 5 kali, dan terakhir untuk nama project, berinama dengan nama Prjpenjualan.

f. Langkah selanjutnya adalah membuat Menu, yaitu dengan cara double klik form_menu, pada window project, lalu klik kanan mouse pada form (area Kerja), Klik Menu Editor, Ketik nama caption “ File”, name “nmfile”, lalu klik next,lanjutkan dengan caption dan name yang lain, seperti gambar berikut :
Gambar 2. membuat form Menu

g. Jika sudah selesai klik Ok, Lanjutkan dengan Klik File, Klik Kategori, lalu ketik koding berikut Frm_kategori.show, untuk mengkonekkan dengan form kategori, lanjutkan dengan menu yang lain.

h. Membuat Modul
Klik menu Project, Klik Add Module, ketikkan listing berikut :

Public konekdb As New ADODB.Connection
Public rsdb As New ADODB.Recordset
Public strkonek As String
Public strsql As String

Public Function konek()
strkonek = "Provider = msdasql.1;persist security info = false; data source =dsnpenjualan"
If konekdb.State = adStateOpen Then
    konekdb.Close
    Set konekdb = New ADODB.Connection
    konekdb.Open strkonek
Else
    konekdb.Open strkonek
End If
End Function

i. Klik tombol Simpan.

@Ahmad
Selamat mencoba…

Related Post:

Materi 1. Membuat Program Aplikasi Penjualan Barang pada VB dengan Mysql “Membut Menu dan Modul”

Materi 2. Membuat Form Kategori dgn Visual Basic 6.0 + Mysql

Materi 3. Membuat program Form Produk (VB + Mysql)

Materi 4. Membuat program Form Transaksi (Visual Basic + Mysql)

Materi 5. Membuat Program Aplikasi Penjualan Barang pada Visual Basic 6.0 dengan Mysql : Membuat Nomor Nota Otomatis pada Visual Basic

Materi 6. Membuat laporan dengan Crystal Report