用下面一条语句即可解决:
PrivateSubForm_Load()
Picture1.AutoRedraw=True
EndSub
或者直接在设计界面把Picture1的AutoRedraw属性设为True即可
补充:把AutoRedraw设为True后,你那些所谓的中断、重绘的语句就可以统统不用了,否则就会一团黑了。AutoRedraw的意思,就是自动重绘!不管是因为鼠标移动、被其他窗口挡住还是最小化窗口等等,已画的图形都不会消失!