powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Доступ к полю
10 сообщений из 10, страница 1 из 1
Доступ к полю
    #32152651
Фотография Wit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет всем!
Одна маленькая проблемка, дело в том, что на VB я практически ничего не писал, дак вот, стоит задачка в Access получить значение к.л. поля из таблицы, например таблица Proba, поле Text, и значение этого поля надо присвоить переменной А?

заранее благодарен!
...
Рейтинг: 0 / 0
Доступ к полю
    #32152652
Фотография Wit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это опять я ;)
хотя бы просто ссылку, где почитать можно...
...
Рейтинг: 0 / 0
Доступ к полю
    #32152679
Максим$
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может тебе лучше книжку купить, про ACCESS VBA. хотя бы самую тоненькую...

Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb() ' Здесь говорим, что мол в текушей базе
Set rs = db.OpenRecordset("Proba") ' Здесь открываем таблицу Proba
rs.MoveFirst 'Здесь переходим к первой строке таблицы Proba
A=rs.Fields("Text") 'Здесь присваиваем переменной А значение первой строки поля Text
.....

rs.Close
Set rs = Nothing
Set db = Nothing
...
Рейтинг: 0 / 0
Доступ к полю
    #32152707
Фотография Wit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
дак книжечка то есть... :(


спасибо заранее!
...
Рейтинг: 0 / 0
Доступ к полю
    #32152709
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Или DLookup. Работать будет медленнее, зато читать меньше.
...
Рейтинг: 0 / 0
Доступ к полю
    #32152737
Максим$
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да так легче:
А = DLookup("Text", "Proba") ' для первой строки в таблице
А = DLookup("Text", "Proba", id=3) ' для строки, где например поле id =3

Но так ты далеко не уедешь Так что лучше сразу читай про рекордсеты...
...
Рейтинг: 0 / 0
Доступ к полю
    #32152739
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Поправка.

DLookup("Text", "Proba", " id=3 " )
...
Рейтинг: 0 / 0
Доступ к полю
    #32152748
Максим$
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Владимир Саныч
Да-да!
Но если id - текстовый, то сойдет и без кавычек...
...
Рейтинг: 0 / 0
Доступ к полю
    #32152749
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Если он текстовый, то кавычек нужно две пары. Первая - потому, что этот параметр функции DLookup обязан быть текстовым. Вторая - вокруг значения 3. И плюс к тому надо позаботиться, чтобы одни кавычки внутри других были правильно поняты.

Код: plaintext
DLookup( "Text" ,  "Proba" ,  "id='3'" )


Без кавычек можно так:

Код: plaintext
1.
2.
Dim s As String
s =  "id=3 " 'кавычки переехали сюда
... DLookup("Text", "Proba", s) 'а тут строковая переменная
...
Рейтинг: 0 / 0
Доступ к полю
    #32152763
Максим$
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Владимир Саныч
Млин, ошибку уловил у себя...
Ведь знаю все это - уж про кавычки статью написал...
а забыл в одном месте поставить, и ведь не ругается акесс то! просто игнорирует 3-ий параметр, и берет естественно 1-ую строчку! Я и не заметил..
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Доступ к полю
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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