0 голосов
спросил от в категории VBNET
Вам нужно использовать поток рабочего фона для импорта записей. Запуск импорта в потоке графического интерфейса пользователя не позволяет системе обновлять экран. Множество статей, перечисленных в #codeproject: background worker - Google Search # [#^ #], которые объясняют проблему и ее решение.

Ваш ответ

Отображаемое имя (по желанию):
Конфиденциальность: Ваш электронный адрес будет использоваться только для отправки уведомлений.
0 голосов
ответил от
private Maximum_rec as integer Sub Importdata       ' you have to count records before importing      Maximum_rec = Form1.totalrecords      Form1.import_new_table()      Form1.divide_temp_table_into_other_tables() End Sub  Sub Importdata_withprogress        Dim nth As New Threading.Thread(AddressOf Importdata )        nth.Start()        While nth.IsAlive             IF Maximum_rec <> 0 THEN                 ProgressBar1.Maximum = Maximum_rec                 'x=the current record in loop                 IF x <= Maximum_rec Then                     ProgressBar1.Value = x                 END IF             END IF             Application.DoEvents             'Threading.Thread.Sleep(100)        End While End Sub

Категории

Добро пожаловать на сайт DraftingCode Q&A (ИТ ответы), где вы можете задавать вопросы и получать ответы от других членов сообщества.

Связанных вопросов не найдено

...