5. ทำการประกาศตัวแปรใน Public Class ของฟอร์มดังนี้
Dim Cn As New OleDbConnection
Dim Dr As OleDbDataReader
Dim cm As OleDbCommand
Dim DS As New DataSet
Dim DA As OleDbDataAdapter
6. ใน Private Sub Form_Load ให้เขียนคำสั่งเพื่อเชื่อมต่อกับฐานข้อมูล ดังนี้
Cn.ConnectionString = "Provider=Microsoft.ACE.OLeDB.12.0;
Data Source=" & Application.StartupPath & "\db.accdb"
Cn.Open()