Форма доступа: `abc.Picture =" xyz.jpg "` заставляет списки и текстовые поля "мигать" один раз

Question

Вероятно, есть быстрый ответ на этот вопрос:

Я только начинаю задание Access 2016 У меня есть форма со списком и Image Control с именем imgFrame. При щелчке имени файла в списке отображается изображение. Код для события Click списка просто: imgFrame.Picture = "c:\path\filename.jpg"

Каждый раз, когда запускается эта строка, изображение загружается нормально, но элемент управления изображениями (и любые текстовые поля в форме) один раз. (пока кнопка команды не мигает.)

---

Снимок экрана (в замедленном режиме)

Я пробовал заполнение с помощью Application.Echo так:

Sub showImg_pic(fName)
    Application.Echo False
    imgFrame.Picture = fName
    DoEvents
    Application.Echo True
End Sub

и экспериментировал с imgFrame.Visible таким же образом, но не видел никакой разницы.

Мысли? Спасибо!

Answer 1

Настройка кода. Свойство Picture требовалось вернуться в Access 2003, прежде чем свойство ControlSource было добавлено в элемент управления Image.

Я никогда не использовал свойство Picture. Я использую свойство ControlSource для динамической загрузки изображений в элемент управления изображения. Он может ссылаться на поле типа вложения, содержащее файлы изображений, но встраивание файлов может существенно увеличить размер дБ, быстрее достигая предела размера файла доступа 2 ГБ. Таким образом, можно также ссылаться на текстовое поле, которое имеет полный путь изображения для внешнего расположения или частичный путь, и использовать выражение для создания полного пути. Нет кода VBA. Не мигает.

="C:\your folder path\" & [listbox name]

Используйте любое поле для создания имени файла изображения:
="C:\your folder path\" & [EmployeeID] & ".jpg"

Если изображения находятся в папке рядом с БД:
=CurrentProject.Path & "\Images\" & [listbox name]

Если изображения находятся на центральном сервере, используйте UNC-путь:
="\\servername\path\Images\" & [listbox name]