Мониторинг modifed event на richbox-e - VB

Формулировка задачи:

Я хочу знать есть ли событие modifed у richbox-e? Если нет, то как я могу сделать это? (чтоб изменения в richbox-e можно было бы использовать как условие) if richbox(данные были изменены) then msgbox(.....)

Решение задачи: «Мониторинг modifed event на richbox-e»

textual
                            Листинг программы 
                        

                            Option Explicit
 
Dim myBL1 As Boolean
Dim myBL2 As Boolean
 
Private Sub TXT_Change()
If myBL1 Then
    myBL2 = True
Else
    myBL1 = True
End If
End Sub
 
Private Sub Form_Unload(Cancel As Integer)
If myBL2 Then MsgBox 'Данные были изменены'
End Sub
'2 переменых,т.к. TXT_Change происходит при открытии Form 1 раз
                        