VB.NETでUIを「固まらせない」——Async/Awaitで実現するプロフェッショナルな非同期処理
こんにちは。業務自動化の現場で長年戦ってきたエンジニアです。
VBAで「マクロを実行した瞬間、Excelが白くなって『応答なし』になる」という経験をしたことはありませんか？ Windows Formsアプリケーションも同じです。メインUIスレッドで重い処理（ファイル読み込みや複雑な計算）を走らせると、Windowsは「このアプリは死んでいる」と判断し、操作を受け付けなくなります。
今日は、VB.NETの魂とも言えるAsync/Awaitパターンを使い、UIを軽やかに保ちながら裏で重い作業を完遂させる「非同期処理」の極意を伝授します。ここをマスターすれば、あなたのアプリは「素人のツール」から「業務システム」へと昇華します。
—
1. なぜUIがフリーズするのか？
Windows FormsのUIは、「メッセージループ」という単一の列車の車掌さんのような存在によって管理されています。
- メインスレッド（UIスレッド）： 画面を描画し、ボタンクリックを検知する唯一の車掌さん。
- 重い処理： 車掌さんに「終わるまで動くな」という重い荷物を背負わせる行為。
車掌さんが荷物を運んでいる間、画面の再描画もボタンのクリック検知も止まってしまいます。これが「フリーズ」の正体です。「Async/Await」は、この荷物を別の配送業者（バックグラウンドタスク）に預ける魔法のチケットだと考えてください。
—
2. 実践：非同期ファイル処理のコード
まずは、ボタンを押すとファイル処理を行い、プログレスバーを動かす実装例を見てみましょう。
Imports System.Threading.Tasks
Public Class MainForm
‘ Async修飾子を付けることで、このメソッド内でAwaitが使えるようになります
Private Async Sub btnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click
‘ 連続実行を防ぐためボタンを無効化
btnStart.Enabled = False
progressBar.Value = 0
‘ 重い処理を別スレッドで開始（Task.Run）
‘ Awaitは「処理が終わるまで、一旦ここでUIスレッドを解放して待機せよ」という命令です
Await Task.Run(Sub()
PerformHeavyTask()
End Sub)
‘ 処理が終わると、自然とUIスレッドに戻ってきます
btnStart.Enabled = True
MessageBox.Show(“処理が完了しました！”)
End Sub
‘ 実際に重い処理を行うメソッド
Private Sub PerformHeavyTask()
For i As Integer = 1 To 100
‘ 疑似的に重い処理を再現
System.Threading.Thread.Sleep(50)
‘ 【注意】UIコントロール（ProgressBar等）の直接操作はここで行ってはいけません！
‘ 別のスレッドからUIをいじるとクラッシュします
Next
End Sub
End Class
—
3. 「ここだけは絶対に押さえて！」重要ポイント
① 「UIスレッド」と「バックグラウンド」の境界線
VB.NETの初心者が最も陥りやすい罠が、「バックグラウンドスレッドから直接UIを書き換えようとしてエラーになる」ことです。
`PerformHeavyTask` の中で `progressBar.Value += 1` と書いてはいけません。非同期処理の進捗をUIに伝えたい場合は、`IProgress(Of T)` インターフェースを使うのが現代のVB.NETの正解です。
② 成功する非同期実装（IProgressの活用）
‘ プログレスバーの更新を安全に行うための実装
Private Async Sub btnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click
btnStart.Enabled = False
‘ 進捗報告用のオブジェクトを作成
Dim progress = New Progress(Of Integer)(Sub(percent)
progressBar.Value = percent
End Sub)
‘ Task.Runの中で進捗を報告する
Await Task.Run(Sub()
For i As Integer = 1 To 100
System.Threading.Thread.Sleep(50)
‘ UIスレッドへ安全に進捗を送る
CType(progress, IProgress(Of Integer)).Report(i)
Next
End Sub)
btnStart.Enabled = True
End Sub
—
4. 伝説のエンジニアからのアドバイス
非同期処理を扱う際、以下の3点を心に刻んでください。
1. 「Async Sub」はイベントハンドラ専用：
通常のメソッドを非同期にする場合は `Async Sub` ではなく `Async Function Task` を返しましょう。例外処理が呼び出し元に伝わらなくなります。
2. キャンセル処理を考慮する：
ユーザーは「間違えてボタンを押した」ときに停止ボタンを求めます。`CancellationToken` を使う準備を今のうちからしておきましょう。
3. 例外を握りつぶさない：
`Task.Run` の中で発生したエラーは、`Await` を呼び出している場所で `Try…Catch` することで捕捉できます。非同期だからこそ、エラーハンドリングを怠らないでください。
—
まとめ：あなたのコードを「呼吸」させよう
UIがフリーズするアプリは、ユーザーにストレスを与えます。一方で、Async/Awaitを使いこなしたアプリは、重い処理中もウィンドウをドラッグでき、状況をプログレスバーで優雅に伝えてくれます。
VB.NETは古い言語だと言われることもありますが、モダンな非同期構文を正しく扱えば、現代のWindows開発においても非常に強力な武器になります。
まずはこのコードをコピーして、ご自身のプロジェクトで「ボタンを押しても画面が固まらない」感動を味わってください。そこが、中級者への第一歩です。頑張ってくださいね！
