Tugas Visual Basic

'BAGUS
'UJIAN SEMESTER VISUAL BASIC 6.0
'PROGRAM MANAJEMEN INFORMASI DAN KOMPUTER
'120 MENIT
'==========================================
'buka file model 2 auto number
'TULISKAN POTONGAN KODE YANG ADA PADA PROGRAM UNTUK PERINTAH - PERINTAH BERIKUT:
' 1. KONEKSI PROGRAM DENGAN DATABASE
' 2. KONEKSI PROGRAM DENGAN TABEL
' 3. PROSEDUR SIMPAN
' 4. PROSEDUR EDIT
' 5. PROSEDUR DELETE
' 6. PROSEDUR CARI
' 7. jelaskan langkah - langkah untuk menjalankan program dengan urutan sebagai berikut:
'    a. cara untuk memasukkan data dan menyimpan
'    b. cara untuk mencari dan mengedit data
'    c. cara untuk menghapus data

Public Conn As New ADODB.Connection
Public RSBarang As ADODB.Recordset

Public Sub BukaDB()
Set Conn = New ADODB.Connection
Set RSBarang = New ADODB.Recordset
Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DBDasar.mdb"
End Sub