Комбинированный(Combobox) / Microsoft Access

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

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

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Комбинированный(Combobox)

9 сообщений из 9, страница 1 из 1

Комбинированный(Combobox)

#39255021

Kovala

Гость

Всем привет, имеется такой вопрос. Надо в access в форме в комбинированный, он же combobox в excel, добавить текст, однако в excel справлялся с помощью строчки vba, а тут не знаю. Читал, что нужно написать процедуру, а потом..., а потом куда её прописать не знаю.Может кто-то знает, как с помощью vba записать данные в "комбинированный"
код в экселе:

Код: vbnet

Combobox1.AddItem "TEXT"

...

Рейтинг:

0 / 0

12.06.2016, 19:11

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255032

_гурД

Гость

Kovala,

так же, за исключением, м. б. того, что св-во Источник строк надо предварит задать как Список значений

...

Рейтинг:

0 / 0

12.06.2016, 20:02

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255043

Kovala

Гость

_гурД,
Он так и задан

...

Рейтинг:

0 / 0

12.06.2016, 21:02

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255046

гурД

Участник

Откуда: Присоединённые территории

Сообщения: 1 014

Рейтинг: 0 / 0

Kovala,

а в Экселе, разве, не процедурой это было у вас оформлено?
К примеру на событие Получение фокуса этим контролом:

Код: vbnet

1.
2.
3.

private sub Combo_setfocus()
  if чего-нибудь там = "ляля" then me.combo.additem "ляляля"
end sub

Это рамещаете в модуле формы, на которой у вас расположен комбо

...

Рейтинг:

0 / 0

12.06.2016, 21:13

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255047

sdku

Участник

Откуда: Краснодар

Сообщения: 7 762

Рейтинг: 0 / 0

Kovala,
Этот источник строк создаст список: первая строка " текст" и далее значения поля ctl2 не равные NULL и отсортированные по возрастанию

Код: vbnet

Me.ComboBox.RowSource ="SELECT top 1 ' text' FROM Таблица1 UNION SELECT ctl2 FROM Таблица1  WHERE not ctl2 is null GROUP BY ctl2"

...

Рейтинг:

0 / 0

12.06.2016, 21:15

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255065

Kovala

Гость

sdku,
Но мне не надо брать данные из таблицы. Я буду забивать текст через Vba сам, как я приводил пример в моем первом письме

...

Рейтинг:

0 / 0

12.06.2016, 21:55

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255066

Kovala

Гость

гурД,
Нет в экселе я обычным sub писал, причём sub userformunitialize

...

Рейтинг:

0 / 0

12.06.2016, 21:56

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255071

sdku

Участник

Откуда: Краснодар

Сообщения: 7 762

Рейтинг: 0 / 0

Kovala,

...

Рейтинг:

0 / 0

12.06.2016, 22:04

| Ответить | Цитировать | Написать

Комбинированный(Combobox)

#39255104

гурД

Участник

Откуда: Присоединённые территории

Сообщения: 1 014

Рейтинг: 0 / 0

Kovalaв экселе я обычным sub писал
Ну, считайте, что здесь тем же обычным, только

Код: plaintext

private sub

(это один из множества вариантов, попроще...)

...

Рейтинг:

0 / 0

12.06.2016, 23:15

| Ответить | Цитировать | Написать

9 сообщений из 9, страница 1 из 1

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Комбинированный(Combobox)

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=45&msg=39255021&tid=1613484]:	0ms
get settings:	9ms
get forum list:	12ms
check forum access:	3ms
check topic access:	3ms
track hit:	46ms
get topic data:	11ms
get forum data:	5ms
get page messages:	42ms
get tp. blocked users:	1ms
others:	328ms

total:	460ms