access vba

[JMM427]

I am brand new to vba for access and I tried running some examples from a book I read, but the objects I am referencing are not being recognized (like dim db as database). Do I have to reference or import anything first? The code that doesn't work is as follows:

Option Compare Database
 
Sub exaCreateQuery()
 
Dim db As database
Dim rs As Recordset
Set db = CurrentDb
 
 
End Sub

produces the error: user defined type not defined