event Change ()
Occurs when the control's caption is changed.

TypeDescription
The Change event notifies your application when the control's caption is changed. Use the Caption property to access the control's caption. Use the Execute method to execute a command. The KeyDown event occurs when the user presses a key while an object has the focus. By default, the Caption property replaces the control's stack ( operators and operations ) with giving caption. If the new caption just change the format of the Caption property ( includes just HTML tags ), the new format is applied to the control's label and control's stack ( operators and operations ) is not altered. For instance, let's say that the control's label displays the number 78, and during the Change event your application change the Caption property to "<sha ;;0><b>" + Caption. In this case, the content of the Caption is not change, instead just the new HTML format is applied to the control's label, so operations on the calculator can continue. 

Syntax for Change event, /NET version, on:

private void Change(object sender)
{
}

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

Syntax for Change event, /COM version, on:

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

void OnChange()
{
}

void __fastcall Change(TObject *Sender)
{
}

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

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

begin event Change()
end event Change

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

Private Sub Change()
End Sub

Private Sub Change()
End Sub

LPARAMETERS nop

PROCEDURE OnChange(oCalc)
RETURN

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

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

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

Procedure OnComChange 
	Forward Send OnComChange 
End_Procedure

METHOD OCX_Change() CLASS MainDialog
RETURN NIL

void onEvent_Change()
{
}

function Change as v ()
end function

function nativeObject_Change()
return

The following sample displays the control's caption as soon as user types characters in the control:

Private Sub Calc1_Change()
    With Calc1
        Debug.Print .Caption
    End With
End Sub

The following sample displays a different format for the control's label:

Private Sub Calc1_Change()
    With Calc1
        .Caption = "<sha ;;0><b>" & .Caption
    End With
End Sub

The following sample displays a different format for the control's label, when negative numbers are displayed

Private Sub Calc1_Change()
    With Calc1
        Dim format As String
        format = "<sha ;;0><b>"
        If (.Caption < 0) Then
            format = format & "<fgcolor FF0000>"
        End If
        .Caption = format & .Caption
    End With
End Sub