Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 13.10.2012
Сообщений: 20

вывод из access в combo

31.05.2013, 12:29. Показов 1145. Ответов 15
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
как сделать чтобы записи из одного столбца выводились в комбо бокс? так же с новыми записями - чтобы добавлялись туда же
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
31.05.2013, 12:29
Ответы с готовыми решениями:

Занесение в БД значений из двух Combo c++ по значению Combo из бд
Здравствуйте, подскажите, пожалуйста на форме два combobox`a и кнопка, в боксах загружены водители FIO и машины номера их, Num. Как мне...

Combo box
Очень надо! Есть свич с комбо боксом.... 2 формы... Надо текст выбранного айтема в комбобоксе, передать в стринге на 2-ую форму... ...

Помогите с Combo
Помогите новичку. Хочу организовать поиск, при выборе из списка Combo "Фамилия", должен появляться под ним поле для ввода фамилии а...

15
Модератор
10048 / 3894 / 883
Регистрация: 22.02.2013
Сообщений: 5,847
Записей в блоге: 79
31.05.2013, 13:43
Используй контрол из библиотеки Microsoft DataList Controls DataCombo если работаешь с ADO. Указывай источник данных (DataSource), источник строй (RowSource) и поля.
0
0 / 0 / 0
Регистрация: 13.10.2012
Сообщений: 20
31.05.2013, 13:47  [ТС]
а без ADO никак?
0
Модератор
10048 / 3894 / 883
Регистрация: 22.02.2013
Сообщений: 5,847
Записей в блоге: 79
31.05.2013, 13:49
Если DAO тогда Microsoft Data Bound List Controls
0
0 / 0 / 0
Регистрация: 13.10.2012
Сообщений: 20
31.05.2013, 14:00  [ТС]
все сделал, показывает только первого, а при открытии комбо вообще пусто
0
Модератор
10048 / 3894 / 883
Регистрация: 22.02.2013
Сообщений: 5,847
Записей в блоге: 79
31.05.2013, 14:01
Я не телепат, код в тудию
0
0 / 0 / 0
Регистрация: 13.10.2012
Сообщений: 20
31.05.2013, 14:03  [ТС]
нет у меня кода, сделал так как ты написал - указал источник и поля
0
Модератор
10048 / 3894 / 883
Регистрация: 22.02.2013
Сообщений: 5,847
Записей в блоге: 79
31.05.2013, 14:10
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Option Explicit
Dim DB As adodb.Connection
Dim Emp As adodb.Recordset
Private Sub Form_Load()
    Set DB = New adodb.Connection
    DB.CursorLocation = adUseClient
    DB.ConnectionString = "Provider=Microsoft.Jet.oledb.4.0;" & _
    "Data Source=" & App.Path & "\DB.MDB"
    DB.Open
    Set Emp = DB.Execute("SELECT * FROM tblEmployees")
    Set dcbData.DataSource = Emp
    Set dcbData.RowSource = Emp
    dcbData.DataField = "ФИО"
    dcbData.ListField = "ФИО"
End Sub
0
0 / 0 / 0
Регистрация: 13.10.2012
Сообщений: 20
31.05.2013, 14:21  [ТС]
User-defined type not defined
я подставил свои названия в код и такую ошибку выдает
0
Модератор
10048 / 3894 / 883
Регистрация: 22.02.2013
Сообщений: 5,847
Записей в блоге: 79
31.05.2013, 14:29
Референсы укажи Microsoft ActiveX Data Object Library и Microsoft ActiveX Data Object Recordset Library
0
0 / 0 / 0
Регистрация: 13.10.2012
Сообщений: 20
31.05.2013, 14:34  [ТС]
как?
0
166 / 13 / 2
Регистрация: 21.05.2013
Сообщений: 66
31.05.2013, 15:27
В окне где открыт код VBA -> menu -> tools -> references
0
0 / 0 / 0
Регистрация: 13.10.2012
Сообщений: 20
31.05.2013, 18:30  [ТС]
указал, все так же
0
Заблокирован
31.05.2013, 19:52
The trick, НИ КОГДА НЕ ПРИВЯЗЫВАЙ КОНТРОЛЫ К БАЗЕ ДАННЫХ НА СТАДИИ РАЗРАБОТКИ И КОМПИЛЯЦИИ ДЕЛАЙ ВСЕ ПРОГРАММНО. ВТОРОЕ ЕСТЬ КУЧА ПРИМЕРОВ:

https://www.cyberforum.ru/post4111728.html
0
Модератор
10048 / 3894 / 883
Регистрация: 22.02.2013
Сообщений: 5,847
Записей в блоге: 79
31.05.2013, 20:16
Цитата Сообщение от inv.DS Посмотреть сообщение
The trick, НИ КОГДА НЕ ПРИВЯЗЫВАЙ КОНТРОЛЫ К БАЗЕ ДАННЫХ НА СТАДИИ РАЗРАБОТКИ И КОМПИЛЯЦИИ ДЕЛАЙ ВСЕ ПРОГРАММНО.
Где Вы видели привязку контролов к БД?
1
Заблокирован
31.05.2013, 20:19
The trick, вкладкой браузера ошибся в вба писал. мои извинения!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
31.05.2013, 20:19
Помогаю со студенческими работами здесь

Combo box
Посмотрите рисунок, ребята! Обратите внимание на столбик, над которым написано 'IN'. В этих четырех Комбо-Боксах предложены варианты...

Combo Box
Собственно есть комобокс, его тип: Drop Down List. В нем есть несколько вариантов выбора. На форме так же есть две кнопки...

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

Заполнение Combo Box
Здравствуйте! Подскажите пожалуйста. Есть два combo box на одной форме. Как при выборе значения с combo box 1, заполнить значения в Combo...

biostar pt880pro-a7 combo
При включении идет один длинный сигнал биоса, кто подскажит где копать? Мать biostar pt880pro-a7 combo


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
16
Ответ Создать тему
Новые блоги и статьи
Первый деплой
lagorue 16.01.2026
Не спеша развернул своё 1ое приложение в kubernetes. А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит токи на L и напряжения на C в установ. режимах до и. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Изучаю kubernetes
lagorue 13.01.2026
А пригодятся-ли мне знания kubernetes в России?
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru