Cita:
Iniciado por erbuson 
Hola, sobre Bases de Datos poco puedo decirte pero desde luego aqui hay otros errores que debes corregir.
En primer lugar estás utilizando String (Cadenas) para operaciones que después vas a utilizar en cálculo, pienso que los tipos no son adecuados.
Dim TickNum As String
Dim tNum As String
En segundo lugar, estas asignando a TickNum una cadena
TickNum = "select max(Id_head_venta) as MaxNum from head_venta"
Esto es lo mismo que si pusieras TickNum = "Nada de nada"
Ahora comparas TickNum si es Nulo, cuando le has asignado previamente el valor a la cadena, al no ser nulo le sumas 1 a tu cadena y provocas el error.
Saludos
Ok mas o menos comprendo lo que me dices, pero lo que no me queda claro es como puedo hacer para que me funciona
