Страница: 1 |
Страница: 1 |
Вопрос: Видимость формы при смене фокуса
Добавлено: 21.07.06 20:54
Автор вопроса: Saddam
Ламерский вопрос, наверное, но завис на такой проблеме:
Имеется программка на VB, которая обсчитывает в цикле большую базу. Для контроля за процессом вывожу форму, в которой помещаю label, в текст которой вывожу счетчик цикла, и кнопку Cancel.
For i = 1 To end_base
' поскипана процедура подсчета
Label1.Text = "Обработано " & i & " записей"
Label1.Refresh()
Next
Все работает, только нельзя переходить в другую программу, иначе при возврате фокуса в форму получаю пустой квадрат до конца цикла.
Как победить?
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
shuffle
Администратор
ICQ: 201502381
Вопросов: 15
Ответов: 737
Профиль | | #1
Добавлено: 21.07.06 21:41
' поскипана процедура подсчета
Label1.Text = "Обработано " & i & " записей"
Label1.Refresh()
DoEvents
Next
Номер ответа: 2
Автор ответа:
Saddam
Вопросов: 1
Ответов: 1
Профиль | | #2
Добавлено: 21.07.06 21:58
Спасибо, работает!!!
Век живи, век учись )