Лист или Датабокс

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

Лист или Датабокс

Сообщение ACcaxap » 13.06.2004 (Вс) 20:52

Приветствую

Можноли сделать так :
На форме есть листбокс и несколько текстбоксов
мне надо чтобы в листбоксе отображались элементы первого столбика эксель файла
а в текстбоксах другие 2 столбика

Я думаю что листбокс надо замениь датабоксом
но я не умею этим датабоксом пользоваться
если можно то опишите как им пользоваться

МСДН недоступен
перерыл весь форум - ничего не нашол

заранее благодарен

TEH3OP
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 12.12.2003 (Пт) 20:19
Откуда: Москва

Сообщение TEH3OP » 14.06.2004 (Пн) 2:35

Неясно что-то...

А тебе надо чтобы изменения в ентих контролах отображались?

Целый столбик в текстбоксе -- это как? Построчно чтоль?

ACcaxap
Начинающий
Начинающий
 
Сообщения: 10
Зарегистрирован: 03.06.2004 (Чт) 13:27

Сообщение ACcaxap » 14.06.2004 (Пн) 12:44

обьясняю:
_Есть форма: на ней L1 (Listbox), T1 и T2 (Textbox'ы)

_Есть таблица :

1 a s
2 z x
3 d f
4 c v

Мне надо чтобы в L1 отображался весь первый столбик этой таблицы (1,2,3,4), и при выборе например "1" в T1 и T2 появлялось "a" и "s".

ACcaxap
Начинающий
Начинающий
 
Сообщения: 10
Зарегистрирован: 03.06.2004 (Чт) 13:27

Сообщение ACcaxap » 14.06.2004 (Пн) 13:11

например вот такая форма:
Изображение

и вот такая таблица:
Изображение

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

Сообщение ALX_2002 » 14.06.2004 (Пн) 13:12

Ну я тут пример наваял. Коряво конечно. Но может подойдёт....
Короче - пихай на форму Text1, Text2 и List1 и запускай :wink:

Dim ARR(1 To 5, 1 To 2) As String
Private Sub Form_Load()
ARR(1, 1) = "a"
ARR(1, 2) = "b"

ARR(2, 1) = "c"
ARR(2, 2) = "d"

ARR(3, 1) = "e"
ARR(3, 2) = "f"

ARR(4, 1) = "g"
ARR(4, 2) = "h"

ARR(5, 1) = "i"
ARR(5, 2) = "j"

For n = 1 To UBound(ARR, 1)
List1.AddItem n
Next
End Sub
Private Sub List1_Click()
Text1 = ARR(List1.List(List1.ListIndex), 1)
Text2 = ARR(List1.List(List1.ListIndex), 2)
End Sub

ACcaxap
Начинающий
Начинающий
 
Сообщения: 10
Зарегистрирован: 03.06.2004 (Чт) 13:27

Сообщение ACcaxap » 14.06.2004 (Пн) 14:50

мне ндо чтоб это все автоматом из таблицы бралось
или из mdb файла(тоже таблицы)

ACcaxap
Начинающий
Начинающий
 
Сообщения: 10
Зарегистрирован: 03.06.2004 (Чт) 13:27

Сообщение ACcaxap » 14.06.2004 (Пн) 19:50

ну что
никто не знает чтоли =(

BuilderSoft
Постоялец
Постоялец
 
Сообщения: 350
Зарегистрирован: 21.09.2002 (Сб) 10:13

Сообщение BuilderSoft » 14.06.2004 (Пн) 21:28

Dim Db sa database
dim Rec as Recordset

set Db=OpenDatabase(".........")
set rec=db.opendatabase(.......SQL....)

в excell другое
Нет глупых,
Один узнал раньше других
אין א-אפשר

ACcaxap
Начинающий
Начинающий
 
Сообщения: 10
Зарегистрирован: 03.06.2004 (Чт) 13:27

Сообщение ACcaxap » 15.06.2004 (Вт) 9:50

Всем спасибо
вопрос закрыт


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

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

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

    TopList  
cron