Fechas

Gerardo Garcia
30 de Septiembre del 2004
Como Puedo Hacerle para cuando elimine la fecha y que se quede en blanco el campo es fecha al grabarlo

If TextFAceptado.Text <> "" Then
TablaVendedor.Fields("FECHACEPTA") = textFAceptado.Text
End If

PROTEO45
30 de Septiembre del 2004
Como el campo Fecha no acepta NULL, deberias asignar una variable global a nivel modulo con una fecha nula:
dim FechaVacia as Date
if text1 <> "" then
TablaVendedor!FECHAACEPTA = text1
else
TablaVendedor!FECHAACEPTA = FechaVacia
end if

Te grabara una fecha tipo 30/12/1899, y preguntarias para saber si la fecha esta vacia:
if TablaVendedor!FECHAACEPTA = FechaVacia then
text1 = ""
else
text1 = TablaVendedor!FECHAACEPTA
end if

Espero te sirva.

Suerte