Is there Change Event on Body property of Ol MailItem?

[×× ×¡×˜×¡×™×”]

I would like to add one field to a Outlook MailItem form.
This field will simply count (In real time) the characters that are added to
body (message) property of MailItem object.

The _Change event works fine in user forms of VBA Editor:
Private Sub TextBox1_Change()
Label1.Caption = Len(TextBox1.Text)
End Sub

I try to add similar code to Script Editor of Outlook Message Form and
Change event doesn't fire
The PropertyChange and CustomPropertyChange are not good for my case: 1.
nother of them fire when body (message) property changes
2. they fire after property changes and not in rial time (as change event
fires)

So, if you have any idia for how can i solve the probkem , plz write.

10x