A.ThisForm B.ThisForm.Parent C.This D.This.Parent
A.This B.Parent C.Controls D.ActiveControl
A.end B.return C.endfunc D.endproc