Отсутствие файла изображения при загрузке - VB

Формулировка задачи:

Есть БД. Каждая строка в БД имеет уникальный ID который привязан к названию файла изображения. Выбирается строка в БД, считывается ID и подгружается соответствующее изображение...

Path = "Ris" & Item.SubItems(3) & ".jpg"
Picture1.Picture = LoadPicture(Path)

Вопрос... как сделать так, что бы прога не вылетала при отсутствии изображения... подгружалось например какая то альтернативное изображение или вообще ничего не грузилось

Решение задачи: «Отсутствие файла изображения при загрузке»

textual
                            Листинг программы 
                        

                            Path = "Ris" & Item.SubItems(3) & ".jpg"
IF DIR(PATH)="" THEN PATH="какая то альтернативное изображение.BMP"
Picture1.Picture = LoadPicture(Path)
                        

Оцени полезность:

7 голосов , оценка 3.714 из 5

Похожие ответы