DataAdapter

[Haake]

Hello All :)
I'm a new in SQL and in vba here is my code snippet , can someone explain me how emboldened part works? Why does it needs those to parameters (sql, con)
Thanks in advance



Dim da As OleDb.OleDbDataAdapter
Dim sql As String = Nothing
dbProvider = "PROVIDER=Microsoft.Jet.OLEDB.4.0;"
TheDatabase = "/AddressBook.mdb"
MyDocumentsFolder = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
FullDatabasePath = MyDocumentsFolder & TheDatabase
dbSource = "Data Source = " & FullDatabasePath
con.ConnectionString = dbProvider & dbSource
con.Open()
MessageBox.Show("Database is now open")
sql = "SELECT * FROM tblContacts"
da = New OleDb.OleDbDataAdapter(sql, con)
da.Fill(ds, "AdressBook")
con.Close()
MessageBox.Show("Database is now Closed")
txtFirsName.Text = ds.Tables("AdressBook").Rows(0).Item(1)
txtSureName.Text = ds.Tables("AdressBook").Rows(0).Item(2)