初次用vb处理数据库,一个菜鸟问题请教.

使用DAO来打开一个ACCESS数据库,格式为(.mdb).却被告知是不支持的数据库格式,到底是怎么回事啊?
Private Sub Command1_Click()
Dim s As String
CommonDialog1.ShowOpen
s = CommonDialog1.FileName
Text1.Text = s
End Sub

Private Sub Command2_Click()
Dim mydb As Database
Screen.MousePointer = 11
Set mydb = DBEngine.OpenDatabase(Trim(Text1.Text))
Screen.MousePointer = 1
End Sub
第一个按纽是打开一个对话框,第二个是连接数据库的按纽.有什么错误啊请指教