picturebox控件 .paintpicture的问题

条件：picturebox控件
picture1: visable = true   autosize = false Picture1.ScaleMode = 3
picture2: visable = false  autosize = true  Picture2.ScaleMode = 3问题：
为何直接load窗口无法显示图片，但是用Picture1_Click事件可以将图形load出来，为什么？
Private Sub Form_Load()Picture2.ScaleMode = 3
Picture2.Picture = LoadPicture("...\Picture\1.jpg")
Picture1.ScaleMode = 3
Picture1.PaintPicture Picture2.Picture, 0, 0, Picture1.ScaleWidth, _
Picture1.ScaleHeight, 1, 1, Picture2.ScaleWidth * 1, Picture2.ScaleHeight * 1  '复制图像
End SubPrivate Sub Picture1_Click()Dim i As Double '定义一个变量
'For i = 1 To 10 Step 0.01
i = 1
    Picture1.PaintPicture Picture2.Picture, 0, 0, Picture1.ScaleWidth, _
    Picture1.ScaleHeight, i, i, Picture2.ScaleWidth * i, Picture2.ScaleHeight * i  '复制图像
    'Cls '清除图像
'NextEnd Sub