Взять данные из таблицы в переменную

@SamsonovAlex · Регистрация: 03.03.2008

Студворк — интернет-сервис помощи студентам

Вообще какой-то бред в ассесе! Во-первых укороченный VB а во вторых для того чтобы добраться до Ассесовских полей, я вынужден на форме делать компонент, в его свойства: 'данные' забивать запрос или таблицу. И только потом в коде VB забирать содержимое из value поля в переменную. Не говоря о том что изменение запроса у ListBox не изменяет value вообще ! Может кто скажет как избежать этого бреда ? А то я вообще перестану уважать эту базу данных... :-)

Алексей

03.03.2008, 14:56

>Во-первых укороченный VB

Это ж не VB, а Access

>а во вторых для того чтобы добраться до Ассесовских полей, я
>вынужден на форме делать компонент, в его свойства: 'данные'
>забивать запрос или таблицу. И только потом в коде VB забирать
>содержимое из value поля в переменную.

Для этого есть DLookUp, есть Recordset.

>Не говоря о том что изменение запроса у ListBox не изменяет value
>вообще ! Может кто скажет как избежать этого бреда ? А то я вообще
>перестану уважать эту базу данных... :-)

А что должно изменяться при изменении запроса у ListBox? Никакие данные в таблицах при этом изменятся и не должны. Ни в Access, ни в VB. Про какой value идет речь?

@SamsonovAlex · 03.03.2008, 15:48 **[ТС]**

Спасибо за ответ.
Я просто размышляю как программист... А именно - я пытаюсь поменять какое-то свойство у компонента, которое отвечает за вывод цифири на экран ! Т.е. в ассесе меняю свойство 'данные' у компонента т.е. RowResource и хочу наблюдать изменения за величиной в нем находящейся ! Я считал что эта величина должна называться Value и по наивности думал, что меняя запрос я сделаю Requery и сразу получу измененную Value. Но не тут-то было! Value стоит мертво как вкопанная хоть волосы на голове рви, меняя СКуЛь.
Я, помучившись месяц, придумал как можно получать данные через компонент не получая в нос табличку о том что 'Что-й та вы хотите величину у компонента который не в фокусе ?' Решение оказалось таково:
Один компонент GiperList типа ListBox и он вообще невидим и я с ним работаю:
Может, чтобы обойтись вообще без этого (посреднического и абсолютно ненужного) компонента. я могу просто создать переменную (или объект) какого-то типа (какого ???) и меняя у него какое-то свойство (какое ???), куда я буду вбивать СКуЛь получать от него результат ?
Может есть какой-то пример у вас ? Ну просто банально взять из таблицы по запросу число в переменную ???

@SamsonovAlex · 03.03.2008, 15:50 **[ТС]**

Тут фильтры не позволили мне вставить код для демонстрации :-(

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim kol_zap_r, kol_zap_c, kol_zap_p As Long
GiperList.RowSource = 'SELECT [Kol_strok_radars].[Count-Название региона] FROM Kol_strok_radars;'
GiperList.Selected(0) = True
If GiperList.Selected(0) Then
        kol_zap_r = GiperList.Column(0, 0) - 25
End If
GiperList.RowSource = 'SELECT [Kol_strok_cvets].[Count-От] FROM Kol_strok_cvets;'
GiperList.Selected(0) = True
If GiperList.Selected(0) Then
        kol_zap_c = GiperList.Column(0, 0)
End If
GiperList.RowSource = 'SELECT [Kol_strok_palitra].[Count-Буквенное обозначение цвета] FROM Kol_strok_palitra;'
GiperList.Selected(0) = True
If GiperList.Selected(0) Then
        kol_zap_p = GiperList.Column(0, 0)

03.03.2008, 16:06

Если меняется источник данных списка, надо после изменения применять метод requery:

Visual Basic
1
me![ListBoxName].requery

Тогда список обновится.

Чтобы вытащить что-то из таблицы по условию можно воспользоваться DLookUp:

Например:

Visual Basic
1
r=Dlookup('[SomeField]','SomeTable','[ID]=3')

Ну, или само собой при помощи рекордсета.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@SamsonovAlex 0 / 0 / 0 Регистрация: 03.03.2008 Сообщений: 18

	Взять данные из таблицы в переменную 03.03.2008, 13:05. Показов 3224. Ответов 4 Метки нет (Все метки) Вообще какой-то бред в ассесе! Во-первых укороченный VB а во вторых для того чтобы добраться до Ассесовских полей, я вынужден на форме делать компонент, в его свойства: 'данные' забивать запрос или таблицу. И только потом в коде VB забирать содержимое из value поля в переменную. Не говоря о том что изменение запроса у ListBox не изменяет value вообще ! Может кто скажет как избежать этого бреда ? А то я вообще перестану уважать эту базу данных... :-) Алексей 0

msd
	03.03.2008, 14:56
	>Во-первых укороченный VB Это ж не VB, а Access >а во вторых для того чтобы добраться до Ассесовских полей, я >вынужден на форме делать компонент, в его свойства: 'данные' >забивать запрос или таблицу. И только потом в коде VB забирать >содержимое из value поля в переменную. Для этого есть DLookUp, есть Recordset. >Не говоря о том что изменение запроса у ListBox не изменяет value >вообще ! Может кто скажет как избежать этого бреда ? А то я вообще >перестану уважать эту базу данных... :-) А что должно изменяться при изменении запроса у ListBox? Никакие данные в таблицах при этом изменятся и не должны. Ни в Access, ни в VB. Про какой value идет речь?

@SamsonovAlex 0 / 0 / 0 Регистрация: 03.03.2008 Сообщений: 18
	03.03.2008, 15:48 [ТС]
	Спасибо за ответ. Я просто размышляю как программист... А именно - я пытаюсь поменять какое-то свойство у компонента, которое отвечает за вывод цифири на экран ! Т.е. в ассесе меняю свойство 'данные' у компонента т.е. RowResource и хочу наблюдать изменения за величиной в нем находящейся ! Я считал что эта величина должна называться Value и по наивности думал, что меняя запрос я сделаю Requery и сразу получу измененную Value. Но не тут-то было! Value стоит мертво как вкопанная хоть волосы на голове рви, меняя СКуЛь. Я, помучившись месяц, придумал как можно получать данные через компонент не получая в нос табличку о том что 'Что-й та вы хотите величину у компонента который не в фокусе ?' Решение оказалось таково: Один компонент GiperList типа ListBox и он вообще невидим и я с ним работаю: Может, чтобы обойтись вообще без этого (посреднического и абсолютно ненужного) компонента. я могу просто создать переменную (или объект) какого-то типа (какого ???) и меняя у него какое-то свойство (какое ???), куда я буду вбивать СКуЛь получать от него результат ? Может есть какой-то пример у вас ? Ну просто банально взять из таблицы по запросу число в переменную ??? 0