powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Необходим совет по работе со списком с полем
14 сообщений из 14, страница 1 из 1
Необходим совет по работе со списком с полем
    #39984399
Oleg3412
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте , у меня теоретические вопросы от изучающего акцесс после оракл апекс.
В элемент формы «список с полем» подгружается два столбца по запросу к простой таблице с двумя полями (тут сразу встаёт первый вопрос, а нужен ли посредник в виде запроса, или можно было сразу к таблице обращаться и прописывать интересующие меня условия в «данные»?). Все работает , первый столбец я скрываю как счётчик, показывается второй.
Далее хочу , чтобы пользователь вводил текст (второй столбец) , и ему потом выводился список похожих значений. Сунулся в vba, написал , что интересующее меня значение может быть form1.my_list.itemdata(0). Открыл форму , ввёл часть текста , но пишет «значение не соответствует списку значений в списке» и выделяет это обращение в макросе. Как верно обратиться к введённому пользователем значению без заполнения значения в скрытом столбце ? Цель - это подбор подходящих значений без лишних форм и кнопок, просто нажал Энтер, и список подгрузил соответсвующие данные уже с кодами.
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984408
Фотография Сергей Лалов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что где выводилось?
Вы хотите, чтобы пользователь к примеру ввёл часть слова, и у него в выпадающем поле со списком (комбобокс) выводились для выбора только те значения, которые содержат эту введенную часть?
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984410
Фотография Сергей Лалов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если да, то все просто, примеров много, вот один с нашего сайта:

вот
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984412
Фотография Сергей Лалов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
С form1.my_list.itemdata(0) тоже можно поиграться с массивами, но получится длиннее. Вы пошли по классическому пути перебрать массив. Можно проще, это аксесс, у него сразу есть возможность потрясти источник данных в свойствах.
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984447
Oleg3412
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
(Удалено)
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984449
Oleg3412
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сергей Лалов, да я хочу, чтобы человек вводил часть названия , нажимал ввод и происходило обновление этого элемента «список с полем». Беда в том, что пока не «достукиваюсь» , чтобы он взял именно введённое значение, ругнётся и все. Думал через vba функцию подсунуть в sql значение этого введённого поля, и дальше все запустится . Но тормозит именно при попытке обращения к списку в vba(
Почитаю , спасибо за советы , добью, если так правильно.
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984455
Oleg3412
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сергей Лалов,

Великолепно ! Так и буду теперь писать коды, больше никаких извращений над своим временем , спасибо !!!
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984467
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Еще вариант:набираете в поле новое значение,которое заносится в таблицу и,естессно, в список
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
Private Sub куда_NotInList(NewData As String, Response As Integer)
    Dim intNewCategory As Integer, intTruncateName As Integer, strTitle As String, intMsgDialog As Integer
    Dim rs As DAO.Recordset
    strTitle = "Такой пункт отсутствует в списке "
    intMsgDialog = vbYesNo + vbQuestion + vbDefaultButton1
    intNewCategory = MsgBox("Добавить новый пункт?", intMsgDialog, strTitle)
If intNewCategory = vbYes Then
   DoCmd.RunCommand acCmdUndo
     Set rs = CurrentDb.OpenRecordset("пунктМ")
        rs.AddNew
        rs!пункт = NewData
        rs.Update
   Set rs = Nothing
'если в тбл.больше 2 полей убираете RS и открываете форму для добавления и OpenArg передаете в нужное поле  NewData     
'DoCmd.OpenForm "пунктМ", acNormal, , , acAdd, acDialog, NewData
 Response = acDataErrAdded 'продолжить без сообщения
End If
End Sub
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984517
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg3412
... Цель - это подбор подходящих значений без лишних форм и кнопок, просто нажал Энтер, и список подгрузил соответсвующие данные уже с кодами.
Combo так и работает,причем список не раскрывается-предлагаются варианты по мере ввода символов,а когда предложен нужный вариант нажимается Enter
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984519
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пы.Сы А если нужного значения нет в списке(ничего не предлагается)после нажатия ENTER выводится диалог с вопросом о добавлении нового пункта в список
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984567
ldfanate
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторА если нужного значения нет в списке(ничего не предлагается)после нажатия ENTER выводится диалог с вопросом о добавлении нового пункта в список
Бедные НСИшники, которым такой справочник сопровождать достанется.
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984588
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ldfanate

Бедные НСИшники, которым такой справочник сопровождать достанется.
Стесняюсь спросить:а как юзер,у которого нет доступа к таблицам,добавит в справочник новый пункт
или он будет неизменным в течение всего периода использования БД(зачем создавать "лишнюю" форму?)
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984691
ldfanate
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Лучше подумайте, что будет когда он добавит туда 3-4 новых пункта, где одно и то же, но с ошибками в орфографии. А другие нафигачат со ссылкой на все эти 3-4 дубля последующие документы.

Децентрализованное НСИ - худший вид НСИ, оно ничьё, и за качеством его ведения никто не следит. Получается помойка в БД.
...
Рейтинг: 0 / 0
Необходим совет по работе со списком с полем
    #39984704
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ldfanate
Лучше подумайте, что будет когда он добавит туда 3-4 новых пункта,
Что абсолютно не исключается даже в случае прямого заполнения таблицы.А ограничить круг пользователей с правом добавления в справочник можно(и нужно)в форме.
Кроме как битьем по рукам,причем сильным,данную,которая была, есть и будет,проблему,а именно 100 % безошибочный ввод данных,не решить(и не только в ACCESS)
А думать над неразрешимым вопросом не считаю нужным
...
Рейтинг: 0 / 0
14 сообщений из 14, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Необходим совет по работе со списком с полем
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]