[Статья] [.NET] Потоки.

[OrBiT_DaRk]

Простой пример работы с потоками на VB.NET (с)

1. Создаем новую форму/проэкт. Добавляем кнопку.

2. Переходим к коду, нажав 2 раза на кнопке.
Импортируем потоки

Imports System.Threading

3. Добавляем 2 операции (В моем случае это MsgBox, у вас это ваш код).

Sub operation1()
ProgressBar1.Value += 1
End Sub
Sub operation2()
ProgressBar2.Value += 1
End Sub

4. Переходим к коду запуска создания и запуска потоков.

Dim operat1 As New Thread(AddressOf operation1) 'Создаем новый поток для операции 1
        Dim operat2 As New Thread(AddressOf operation2) 'Создаем новый поток для операции 2
        operat1.IsBackground = True 'Делаем поток фоновым
        operat2.IsBackground = True 'Делаем поток фоновым
        operat1.Start() 'Запускаем поток
        operat2.Start() 'Запускаем поток

Что выйдет: