mciSendString 函式来播放一个avi 档案

请问我使用
mciSendString 函式来播放一个avi 档案
i = mciSendString("open AVIvideo" & A & " alias movie parent " & Frame1.hWnd & " style child", ret, 128, 0)并将其设置在 form 上播放但同时又让form 能继续执行其它往下的程序
如画图…等等
但会出现播放的avi档案和form 正在绘制的图形相互抖动…..闪烁
画面不清楚的结果
该如何避免呢…..