Ayuda Access

[PiquioII]

las tablas son:

OBRAS: idobras, nombre
PERSONAL: idpersonal, horas, fecha, idobras

el codigo que he escrito es el siguiente:

Dim dbs As Database, qdf As QueryDef, sql As String

Me.Cuadro_combinado14.SetFocus
servicio = Me.Cuadro_combinado14.Text
Me.Fecha_Inicio.SetFocus
fecha1 = Me.Fecha_Inicio.Text
Me.Fecha_Final.SetFocus
fecha2 = Me.Fecha_Final.Text

Set dbs = CurrentDb
sql = "select sum ([personal-obra.horas]) as '" & tot & "' from obras inner join personal-obra on ([obras.idobra]) = ([personal-obra.obra]) where ([obras.nombre]) like '" & servicio & "' and ([personal-obra.fecha]) between #" & [fecha1] & " # and # " & [fecha2] & "#"
Set qdf = dbs.CreateQueryDef("consulta-horas", sql)

Y quiero que el resultado de la sql guardarlo en un textbox

Antes de nada muchas gracias.