Private Sub Form_Load()
Picture1.AutoRedraw = True
End Sub