用下面一條語句即可解決：

PrivateSubForm_Load()

Picture1.AutoRedraw=True

EndSub

或者直接在設計界面把Picture1的AutoRedraw屬性設為True即可

補充：把AutoRedraw設為True后，你那些所謂的中斷、重繪的語句就可以統統不用了，否則就會一團黑了。AutoRedraw的意思，就是自動重繪！不管是因為鼠標移動、被其他窗口擋住還是最小化窗口等等，已畫的圖形都不會消失！