T
tina
ShowMonthCalendar-----Original Message-----
I have cut an pasted someone elses code into my project and am getting an
error
Private Sub ExpecetedArrivalDay_DblClick(Cancel As Integer)
' Retrieve the currently selected date(s).
' Call our Function to display the Calendar
' Init the Calendar to select the date
' contained in this control.
' *** Only takes One Click to Select a Date and Close the Window ***
Me.ExpecetedArrivalDay = ShowMonthCalendar(mc, Nz (Me.ExpecetedArrivalDay,
1), , , Me.hWnd, True)
End Sub
The program halts and gives me the error ByRef Argument Type Mismatch 'on
the next to last line where it shows (mc
My control was originaly a datefield and I changed it in my table to a text
field to see if that was the problem.
This field is null (I think) when I doubleclick to bring up the calendar. I
don't know if this has anything to do with the problem or not.
Any direction would be appreciated. Im just trying to pull up the calendar
and click on a date to insert into the ExpectedArrivalDay field.
.
where's the rest of the code? we need to see the function
that is called in the procedure.