Страница: 1 |
В процессе работы надо загружать List данными из БД (12000 строк ). Естественно при этом происходит задержка, можно ли сделать так, чтобы при этом появлялась табличка, например, "Подождите"
Пример Сделал так - не помогло Load stopForm stopForm.ProgressBar1.Min = 0 stopForm.ProgressBar1.Max = rs.RecordCount rs.MoveFirst inCounter = 0 While Not rs.EOF stopForm.Show vbModal inCounter = inCounter + 1 stopForm.ProgressBar1.Value = inCounter stopForm.Show vbModal 'vbModal иначе нельзя,окно ,которое вызывает stopForm - модально Combo1.AddItem rs.Fields("Name") rs.MoveNext Wend Страница: 1 |
Вопрос: Если долгая загрузка, то чем занять пользователя
Добавлено: 23.09.02 10:20
Автор вопроса: dam
Ответы
Всего ответов: 5
Номер ответа: 1
Автор ответа:
root
Вопросов: 12
Ответов: 147
Web-сайт:
Профиль | | #1
Добавлено: 23.09.02 15:00
добавь простой splash или формочку с progress bar'ом...
Номер ответа: 2
Автор ответа:
dam
Вопросов: 12
Ответов: 27
Профиль | | #2
Добавлено: 24.09.02 12:39
Номер ответа: 3
Автор ответа:
dam
Вопросов: 12
Ответов: 27
Профиль | | #3
Добавлено: 25.09.02 09:45
Номер ответа: 4
Автор ответа:
j3d1
ICQ: 8370005
Вопросов: 34
Ответов: 466
Профиль | | #4
Добавлено: 25.09.02 14:25
Вставь в циклы Doevents и напиши где то что то вроде идёт загрузка
Номер ответа: 5
Автор ответа:
MAGNUS
Вопросов: 12
Ответов: 430
Профиль | | #5
Добавлено: 27.09.02 21:49
Второй раз вызывать вот это stopForm.Show vbModal не нужно, а прогресс бар рефрешить надо после изменения валуе.