powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как динамически присоединить TextBox к полю из переменной rs
11 сообщений из 11, страница 1 из 1
как динамически присоединить TextBox к полю из переменной rs
    #32312143
Подскажите пожайлуста, как динамически присоединить TextBox к некоторому полю из переменной rs (тип ADODB.Recordset)?
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32312366
Фотография Deminik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Forms!Myform!myTextbox.ControlSource=rs!field

Так не идет ?
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32312378
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Только один текстбокс - по-моему, не выйдет. Сама форма к данным не привязана?
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32313932
2Deminik: Так не идёт! пишет Invalid use of property.
2Владимир Саныч: Сама форма к данным привязана. У формы динамически устанавливается Recordset = rs (успешно). Теперь хочется данные увидеть (динамически).
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32313956
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Телепатически рассуждаю понимается дело так, что надо по значению в TextBox-е отбирать записи для формы?
Тогда strSQL = "Select * From Table1 Where ID = " & TextBox1

Или с телепатией у меня плохо?
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32313985
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Полагаю, что так:

MyTextBox.ControlSource = "имяполя"
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32314012
2Витал: плохо,
Вот обработчик нажатия кнопки на форме:

Option Compare Database
Public DBConnection As New ADODB.Connection

Private Sub ConnectBtn_Click()
Dim rs As New ADODB.Recordset
Dim cmd As New ADODB.Command
Dim fld As Field

DBConnection.ConnectionString = "Тут строка соединения"
DBConnection.Open

cmd.ActiveConnection = DBConnection
cmd.CommandText = "SELECT * FROM spr_artik"
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.Open cmd
Set Form_Main_form.Recordset = rs
Set fld = rs!nazv

End Sub
На области данных лежит TextBox. Как ему дать знать, что он должен начать отображать значения некоторого поля из rs (поле - переменная fld)?

2Владимир Саныч: Так не выходит!
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32314039
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
> Так не выходит!

А подробнее?
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32314722
2Владимир Саныч: Спасибо за последний совет. Работает. То я вместо MyTextBox.ControlSource = "имяполя"
писал
Set MyTextBox.ControlSource = "имяполя". Кстати, может кто-то заодно расскажет про Set? Почему здесь
Set Form_Main_form.Recordset = rs он нужен, а здесь
MyTextBox.ControlSource = "имяполя" нет?
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32314997
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Потому что рекордсет - это объект. А стринг - нет.

Кстати, в .NET это ликвидировано, там слова Set нет вообще.
...
Рейтинг: 0 / 0
как динамически присоединить TextBox к полю из переменной rs
    #32315211
2Владимир Саныч: Спасибо за ответ!
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как динамически присоединить TextBox к полю из переменной rs
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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