Dim Picture1 Как PictureBox?Проблема с LoadPicture!

Question

Мой VB6 Код:

Dim Picture1 As PictureBox
Picture1.Picture = LoadPicture("D:\1538125064shot.jpg")

Я получаю следующую ошибку во второй строке:

91: переменная объекта или переменная блока не установлена ​​

Answer 1

Используйте StdPicture для удержания изображений перед их использованием

Dim myPic As StdPicture
Set myPic = LoadPicture("D:\1538125064shot.jpg")

Позже вы можете применить его к графическому блоку, как это

Set Picture1.Picture = myPic

Answer 2

Ваша переменная объявлена ​​как Picture1, но вы пытаетесь обратиться к ней как Picture1v.