Tutorial Membuat Form Admin / Kasir Program Aplikasi Penjualan VB 6.0 - Part7

Tutorial Membuat Form Admin / Kasir Program Aplikasi Penjualan VB 6.0 - Part7

Pada kesempatan ini TeknoTips.NET akan mengulas tentang "" dengan judul artikel "Tutorial Membuat Form Admin / Kasir Program Aplikasi Penjualan VB 6.0 - Part7".

Belajar VB - Kursus VB - Tutorial Visual Basic 6.0 dan Visual Basic .Net - Visual Basic Indonesia
Buat lah design Form Admin atau Kasir seperti gambar dibawah :
Form admin dibuat untuk memanage tabel admin dimana nantinya akun admin tersebut yang akan bisa login ke Aplikasi yang dibuat. Gambar diatas adalah bentuk form admin dimana disesesuaikan dengan tabel Admin didalam database :

Dengan Design tabel admin diatas maka anda harus bisa membuat form untuk Input, edit dan delete sesuai dengan kebutuhan Program yang anda buat.

Masukan Koding dibawah ini :
Dim mvBookMark As Variant
Private Sub Command1_Click()
Call BukaDB
Dim SQLTambah As String
            SQLTambah = "Insert Into Admin (KodeAdmin,NamaAdmin,passwordAdmin,levelAdmin) values ('" & Text1 & "','" & Text2 & "','" & Text3 & "','" & Combo1 & "')"
            koneksi.Execute SQLTambah
            MsgBox "Data Berhasil diinput"
            Form_Activate
End Sub

Private Sub Command4_Click()
Unload Me
End Sub

Sub Form_Load()
Text1.MaxLength = 6
Text2.MaxLength = 20
Text3.MaxLength = 15
Text3.PasswordChar = "X"
End Sub
Private Sub Form_Activate()
Call BukaDB
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\DBAplikasi.mdb; "
Adodc1.RecordSource = "select KodeAdmin,NamaAdmin, LevelAdmin from Admin"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
DataGrid1.Columns(0).Width = 1000: DataGrid1.Columns(0).Locked = True
DataGrid1.Columns(1).Width = 2300: DataGrid1.Columns(1).Locked = True
DataGrid1.Columns(2).Width = 1200: DataGrid1.Columns(2).Locked = True

Command1.SetFocus
Combo1.Clear
Combo1.AddItem "USER"
Combo1.AddItem "ADMIN"
Text1 = ""
Text2 = ""
Text3 = ""
End Sub
Jika ada kesulitan, silahkan berkomentar dibawah yaaa....
Ikuti terus pembelajaran kami selanjutnya :)

Keyword : Project Penjualan VB6,
Untuk mendapat notifikasi setiap artikel terbaru, masukkan e-mail anda disini : Tuliskan komentar relevan anda dibawah ini dengan jelas & sopan, sesuai dengan topik ulasan mengenai Project Penjualan VB6 Terbaru 2019.

Untuk menghindari spam dan tautan aktif, komentar akan dimoderasi. Dapatkan balasan dari melalui e-mail anda :

Komentar artikel "Tutorial Membuat Form Admin / Kasir Program Aplikasi Penjualan VB 6.0 - Part7"

Posting Komentar

Iklan Atas Artikel

Iklan Tengah Artikel 1

Iklan Tengah Artikel 2

Iklan Bawah Artikel