Microsoft forms 2.0

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

Microsoft forms 2.0

Сообщение Kosyak » 19.11.2003 (Ср) 10:18

Народ!!! Обьясните пожалуйста как настроить грамотно combobox из Microsoft forms 2.0. Чтоб он отображал данные из одной таблицы и подставлял за кулисами цифры в другуб таблицу....
Ниже приведён код, он вроде работает, то есть заролняется данными, НО не отображает ничего (((
Dim MyArray()
ReDim MyArray(2, Link.rssqlMens.RecordCount)
Link.rssqlMens.MoveFirst
For i = 1 To Link.rssqlMens.RecordCount
MyArray(0, i-1) = Link.rssqlMens.Fields(0)
MyArray(1, i-1) = Link.rssqlMens.Fields(1)
Link.rssqlMens.MoveNext
Next i

comID_str.ColumnCount = 2
comID_str.Column() = MyArray
comID_str.BoundColumn = 1
comID_str.TextColumn = 2
Set comID_str.DataSource = Link
comID_str.DataMember = Police
comID_str.DataField = ID_str
comID_str.ColumnWidths = "0;10"

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

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

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 9

    TopList