вопрос про массивы элементов управления

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Студентка
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 06.06.2005 (Пн) 18:40

вопрос про массивы элементов управления

Сообщение Студентка » 06.06.2005 (Пн) 18:42

Здравствуйте, у меня такая проблема:
Есть массив элементов управления( textbox-ов) в количестве,постоянно изменяемом.
есть 3 элемента ADODC, которые нужно связать с этими текстбоксами, для ввода данных в
БД.
т.е. при выборе варианта №1 должен использоваться adodc1, и например для этого варианта есть 3 текстбокса
при выборе варианта №2 используется adodc2 и на форме появляется 4 тексбокса.
при выборе варианта 3 на форме- 5 тестбоксов.
как связать в каждом варианте каждый элемент массива текстбоксов с конкретной строкой в таблице БД
используя конкретный adodc, т е чтобы каждый текстбокс отображал лишь
одну ячейку строки( для ввода новых данных)
text1(i).adodc1.Recordset. .....?

Студентка
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 06.06.2005 (Пн) 18:40

Сообщение Студентка » 06.06.2005 (Пн) 18:52

и еще такой вопрос. как добавать к таблице БД еще один столбец программно?

ALX_2002
Мега гуру
Мега гуру
 
Сообщения: 2054
Зарегистрирован: 25.11.2002 (Пн) 20:03

Сообщение ALX_2002 » 06.06.2005 (Пн) 19:30

Навреное ADODB всё таки ? :roll:

А колличество по идее можно получать по

Код: Выделить всё
RS.Fields.Count
и в соответствии с ним показывать TEXT боксы

RS - объект принявший в себя Recordset

А вообще DATA GRID ( помоему так он называется ) удобно для этого использовать. :roll:

Надеюсь, что правильно понял вопрос и правильно ответил :roll:

Студентка
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 06.06.2005 (Пн) 18:40

Сообщение Студентка » 06.06.2005 (Пн) 19:37

ALX_2002
Количество текстбоксов я уже установила, спасибо
мне теперь надо связать каждый текстбокс с опредленной ячейкой в строке, чтобы добавить новые данные
как это сделать не знаю...

Prickly
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 82
Зарегистрирован: 07.10.2004 (Чт) 18:44
Откуда: From Russia

Сообщение Prickly » 06.06.2005 (Пн) 22:05

Для добавления используй
Код: Выделить всё
Adodc1.Recordset.AddNew
Adodc1.Recordset(0) =txt1.Text
Adodc1.Recordset(1) = txt2.Text
Adodc1.Recordset.Update
Не было бы Гейтса, не было бы нас!

Prickly
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 82
Зарегистрирован: 07.10.2004 (Чт) 18:44
Откуда: From Russia

Сообщение Prickly » 06.06.2005 (Пн) 22:20

Добавление столбца через alter table ...

Перебирай массив боксов и колонок по индексам в цикле
Не было бы Гейтса, не было бы нас!

Студентка
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 06.06.2005 (Пн) 18:40

Сообщение Студентка » 06.06.2005 (Пн) 22:57

Prickly
Но я же не знаю сколько у меня текстбоксов то появится...
И если можно, хоть примерный вид этого цикла, а то у меня совсем уже крыша едет, с этими циклами, сплошные ошибки...

Prickly
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 82
Зарегистрирован: 07.10.2004 (Чт) 18:44
Откуда: From Russia

Сообщение Prickly » 11.06.2005 (Сб) 23:26

Извиняюсь, если опоздал (У самого сессия).
Примерно вот так

Код: Выделить всё
Adodc1.Recordset.AddNew
  For i = 0 To Adodc1.Recordset.Fields.Count - 1
    Adodc1.Recordset(i) = text1(i).Text
  Next i
  Adodc1.Recordset.Update
Не было бы Гейтса, не было бы нас!

Prickly
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 82
Зарегистрирован: 07.10.2004 (Чт) 18:44
Откуда: From Russia

Сообщение Prickly » 11.06.2005 (Сб) 23:30

Это для добавдения записей. Смотри выше
Не было бы Гейтса, не было бы нас!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 188

    TopList