再请问触发有关问题

再请教触发问题?
DEFINE   CLASS   myhandler   AS   Session
PROCEDURE   MouseDown
LPARAMETERS   nButton,   nShift,   nXCoord,   nYCoord
THISFORM.ACTIVECONTROL.NewObject( 'AA ', 'B ', 'ABC ')
THISFORM.ACTIVECONTROL.AA.VISIBLE=.T.
ENDPROC  
ENDDEFINE
*THISFORM.ACTIVECONTROL.NewObject( 'AA ', 'B ', 'ABC ')
*THISFORM.ACTIVECONTROL.AA.VISIBLE=.T.
*abc.vcx
*现在不能显示

------解决方案--------------------
你先正常调试

THISFORM.NewObject( 'AA ', 'B ', 'ABC ')
THISFORM.AA.VISIBLE=.T.


看看能显示吗？如果能是这段
THISFORM.ACTIVECONTROL.NewObject( 'AA ', 'B ', 'ABC ')
THISFORM.ACTIVECONTROL.AA.VISIBLE=.T.
有问题，
如果不能显示就是NewObject有问题。