Problemas con "Data type mismatch"

[paladir]

ola a todos. debo admitir que desde que estoy programando este foro me a servido bastante ,asi que se los agradesco muxo (para los que preguntan como para los que responden) pero se me presento un problema. estoy haciendo un Consulta de datos la cual se conecta a una tabla access (utilizo una conexion con database, el codigo que puse es un ejemplo , la cual conecto la base de datos de BIBLIO.mdb) tiene un combobox que extrae datos de una columna, y al momento de hacer la consulta me sale que el tipo de datos no coincide (el error '3464') ya e probado el codigo en la tabla Authors de la misma base de datos y me a funcionado, pero en este no
me podrian ayudar

gracias



Option Explicit
Dim SentenciaSQL As String
Dim Base As Database

Private Sub Command1_Click()
Dim a As String
a = Val(Combo1)
Data1.Recordset.FindFirst ("title =") & a
End Sub

Private Sub Form_Load()
Dim Datos As Recordset
Set Base = OpenDatabase("C:\Archivos de programa\Microsoft Visual Studio\VB98\biblio.mdb", False, False, "")
SentenciaSQL = "select*from titles"
Set Datos = Base.OpenRecordset(SentenciaSQL)
Do While Datos.EOF = False
Combo1.AddItem Datos(0).Value
Datos.MoveNext
Loop
End Sub