abrir el frmNewJourney de la forma en la opinión del diseño
cambiar el nombre de la caja combinada para el pasajero de Field41 al cboPassengerID
utilizar esto los códigos
Time_Enter secundario privado ()
Si DCount (“*”, “tblJourneys”,” [identificación del pasajero] = “y Me.cboPassengerID y” y [fecha] = # " y Me.DTPicker6 y “#") > 0 entonces
MsgBox (“duplicado”)
Terminar si
Terminar el submarino