2014-09-19 5 views
0

извините за мой примитивный вопрос, может быть, вы могли бы мне помочь :)Combobox Нажмите на вызов события

У меня есть сводка на моей форме. Если я нажимаю на него, я вижу такую ​​информацию:

enter image description here

под On Click событие комбобокса я не вижу ни одного кода, который заполняет этот ComboBox. Единственными использованными событиями являются On Got Focus и After Update.

На Got фокусе:

Private Sub ctl42_GotFocus() 
    Call subPfadFilter(ctl42, "Obd2") 
End Sub 

и После обновления событие запускает макрос

этот выпадающий ограничена на источник:

enter image description here

Моя цель для имитации этого действия с помощью кода vba. Если я нажму кнопку на форме, то я хочу посмотреть, что на первом рисунке. Как я могу это сделать?

ответ

1

Нет такого понятия, как примитивный вопрос :) Мы все должны были начать с нуля!

Ваш вопрос немного трудно понять, как к тому, что вы действительно хотите сделать, так что несколько замечаний:

  1. Я предполагаю, что комбо ctl42 фактически возвращает результат - т.е. списка часть комбо имеет в нем строки?

  2. Событие, в котором вы нуждаетесь, является «On Click», а не «On Got Focus». Удалите из своего кода «Private Sub ctl42_GotFocus()». В свойствах комбо выберите вкладку «События», затем в поле «Вкл.», Которое является комбо, выберите [Процедура событий], затем щелкните по эллипсису (...) с правой стороны, а Access будет создайте пустую подсистему для вас в модуле «code-behind-form». Вот где вам нужно поставить свой вызов функции - вызвать subPfadFilter (ctl42, «Obd2»).

  3. Ваша функция subPfadFilter, по-видимому, фильтрует вашу подчиненную форму. Если это не работает, вам может потребоваться опубликовать код для этого здесь.

НТН

+0

Я думаю, я не смог объяснить мою проблему правильно:/У меня есть писать код под 'На click'event. но если я нажму кнопку, я не могу увидеть окно списка под списком – Kaja

0

Если посмотреть на изображение, то при нажатии на ComboBox вы увидите список значений для выбора. Я не могу увеличить изображение, поэтому я не очень уверен, но если это правильно. Это должно быть довольно просто воспроизвести даже без VBA.

Вы можете щелкнуть по маленькому прямоугольнику (...) в конце источника управления и открыть окно запроса для вас. Выберите все столбцы, которые вы хотите, чтобы окно отображалось при щелчке. и убедитесь, что вы перешли на страницу формата и установите количество столбцов на фактическое количество выбранных столбцов, предположим 4, а затем установите ширину каждого столбца и установите столбцы столбцов на Да

Формат собственности Количество столбцов = 4 Ширина колонок = 0,5; 0,5; 0,5; 0,5 Головки столбцов = Да

Смежные вопросы