vb.netで排他処理(ミューテックス)

vb.net 
Imports System.Threading

...

Private mtx As New Mutex
....

'排他開始
 mtx.WaitOne()  

...

'排他完了
mtx.ReleaseMutex()

ネタ元