การดึงข้อมูลในฐานข้อมูล มาเก็บไว้ใน ตัวแปรที่เราประกาศ เขียนโค้สยังไง

	Dim objConn As New OleDbConnection
	Dim objCmd As New OleDbCommand
	Dim dtReader As OleDbDataReader	
	Dim strConnString,strSQL As String

    Sub Page_Load(sender As Object, e As EventArgs)
		strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("database/mydatabase.mdb")&";Jet OLEDB:Database Password=;"
		objConn.ConnectionString = strConnString
		objConn.Open()

		'*** DataTable ***'
		Dim dtAdapter As OleDbDataAdapter
		Dim dt As New DataTable
		strSQL = "SELECT * FROM customer WHERE CustomerID = '"& Request.QueryString("CustomerID") &"' "
		dtAdapter = New OleDbDataAdapter(strSQL, objConn)
		dtAdapter.Fill(dt)

		If dt.Rows.Count > 0 Then
			Me.txtCustomerID.Text = dt.Rows(0)("CustomerID")
			Me.txtName.Text = dt.Rows(0)("Name")
			Me.txtEmail.Text = dt.Rows(0)("Email")
			Me.txtCountryCode.Text = dt.Rows(0)("CountryCode")
			Me.txtBudget.Text = dt.Rows(0)("Budget")
			Me.txtUsed.Text = dt.Rows(0)("Used")
		End IF
	End Sub