event DateChanged ()
Fired when the browsed date is changed.

TypeDescription
Use the DateChanged to notify your application when the browsed date was changed. The DateChanged event is fired if the Date property is changed. The DataChanging property notifies your application that the user is about to change the browsed date, by clicking any of arrows in the header of the calendar window. Use the SelectionChanged event to notify your application when the selection was changed. The SelectionChanged event is fired when user changes the SelDate property. Use the FirstVisibleDate property to get the first visible date. Use the LastVisibleDate property to get the last visible date.

Syntax for DateChanged event, /NET version, on: 

private void DateChanged(object sender)
{
}


Private Sub DateChanged(ByVal sender As System.Object) Handles DateChanged
End Sub

Syntax for DateChanged event, /COM version, on: 

private void DateChanged(object sender, EventArgs e)
{
}


void OnDateChanged()
{
}


void __fastcall DateChanged(TObject *Sender)
{
}


procedure DateChanged(ASender: TObject; );
begin
end;


procedure DateChanged(sender: System.Object; e: System.EventArgs);
begin
end;


begin event DateChanged()
end event DateChanged


Private Sub DateChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateChanged
End Sub


Private Sub DateChanged()
End Sub


Private Sub DateChanged()
End Sub


LPARAMETERS nop



PROCEDURE OnDateChanged(oCalendar)
RETURN

Syntax for DateChanged event, /COM version (others), on: 

<SCRIPT EVENT="DateChanged()" LANGUAGE="JScript">
</SCRIPT>


<SCRIPT LANGUAGE="VBScript">
Function DateChanged()
End Function
</SCRIPT>


Procedure OnComDateChanged 
	Forward Send OnComDateChanged 
End_Procedure


METHOD OCX_DateChanged() CLASS MainDialog
RETURN NIL


void onEvent_DateChanged()
{
}


function DateChanged as v ()
end function


function nativeObject_DateChanged()
return

The following sample displays the browsed date:

Private Sub Calendar1_DateChanged()
    Debug.Print FormatDateTime(Calendar1.Date)
End Sub