Problema con un Combox en una Base de datos

Hola, buenas tardes soy nuevo programando y estoy haciendo un formulario que tengo conectado a una base de datos.

Mi problemas es que al agregar un nuevo registro me da error, la base de datos solo tiene 3 campo nombre, teléfono y departamento, el departamento es un combox. El problema es que al agregar registros en el campo departamento no se guarda a menos que agregue varios lo hace pero el ultimo agregado se queda en blanco agrego ,mi código haber si me pueden echar una mano.

Adodc1.Recordset.AddNew
Adodc1.Recordset!nombre = Text1
Adodc1.Recordset!teléfono = Text2
Adodc1.Recordset!departamento = Combo1.Text
Adodc1.Recordset.Update
Adodc1.Recordset.MoveLast
Text1 = ""
Text2 = ""
Combo1 = ""

saludos