Выдается ошибка функцией LoadPicture (VBA ACCESS)

Ответить

Код подтверждения
Введите код в точности так, как вы его видите. Регистр символов не имеет значения.
BBCode ВКЛЮЧЁН
[img] ВКЛЮЧЁН
[url] ВКЛЮЧЁН
Смайлики ОТКЛЮЧЕНЫ
Обзор темы
   

Развернуть Обзор темы: Выдается ошибка функцией LoadPicture (VBA ACCESS)

Re: Выдается ошибка функцией LoadPicture (VBA ACCESS)

Islan » 21 мар 2018, 09:31

pashulka писал(а):Вольный перевод ошибки гласит, что Вы обращаетесь к несуществующему об'екту. И это правда :)

Код: Выделить всё

Dim ImLst As ImageList
Set ImLst = ИмяФормы.ИмяОбъекта

ImLst.ListImages.Add 1, "key1", StdFunctions.LoadPicture("D:\ГРАНУЛятор\ FlagRed.bmp")
Вторая строка - есть псевдокод, просто не помню :( как в Access идёт обращение к элементам управления.
Болльшое спасибо, разобрался.

Re: Выдается ошибка функцией LoadPicture (VBA ACCESS)

pashulka » 21 мар 2018, 07:58

Вольный перевод ошибки гласит, что Вы обращаетесь к несуществующему об'екту. И это правда :)

Код: Выделить всё

Dim ImLst As ImageList
Set ImLst = ИмяФормы.ИмяОбъекта

ImLst.ListImages.Add 1, "key1", StdFunctions.LoadPicture("D:\ГРАНУЛятор\ FlagRed.bmp")
Вторая строка - есть псевдокод, просто не помню :( как в Access идёт обращение к элементам управления.

Re: Выдается ошибка функцией LoadPicture (VBA ACCESS)

Islan » 21 мар 2018, 07:45

pashulka писал(а):Напишите так и протестируйте эту функцию отдельно, т.е.

Код: Выделить всё

Set p = LoadPicture("D:\ГРАНУЛятор\FlagRed.bmp")
Если прокатит, значит проблема не в ней.

Да, так сработало. Но тогда не понимаю, что вызывает ошибку.

Re: Выдается ошибка функцией LoadPicture (VBA ACCESS)

pashulka » 20 мар 2018, 20:58

Напишите так и протестируйте эту функцию отдельно, т.е.

Код: Выделить всё

Set p = LoadPicture("D:\ГРАНУЛятор\FlagRed.bmp")
Если прокатит, значит проблема не в ней.

Выдается ошибка функцией LoadPicture (VBA ACCESS)

Islan » 20 мар 2018, 10:12

Пожалуйста, помогите разобраться.
В программе на VBA ACCESS в следующем коде:

Dim ImLst As ImageList
ImLst.ListImages.Add 1, 1, StdFunctions.LoadPicture("D:\ГРАНУЛятор\FlagRed.bmp")

выдается ошибка Object variable or With block variable not set.

(Та же ошибка выдается и при опускании StdFunctions). Файл рисунка D:\ГРАНУЛятор\FlagRed.bmp присутствует и другими программами открывается.

Вернуться к началу