by みどるべあ » 2006年4月19日(水) 12:39
コード: 全て選択
CreateThread(ByVal 0,0,AddressOf(Thread),0,0,0)
MessageBox(0,"スレッド外","ThreadTest",MB_OK)
Sub Thread()
MessageBox(0,"スレッド内","ThreadTest",MB_OK)
ExitThread(0)
End Sub
実行するとメッセージボックスが二つ同時に出る。
[code]CreateThread(ByVal 0,0,AddressOf(Thread),0,0,0)
MessageBox(0,"スレッド外","ThreadTest",MB_OK)
Sub Thread()
MessageBox(0,"スレッド内","ThreadTest",MB_OK)
ExitThread(0)
End Sub[/code]
実行するとメッセージボックスが二つ同時に出る。