ID : 5769
RemoveHandler
機能
プロバイダからのイベントを受取りを解除します。
このコマンドはVer.1.7.*から有効です。
解説
プロバイダからのイベントを受取りを解除します。
注意事項
-
関連項目
用例
QRコードプロバイダを使用し、QRコードリーダがQRコードを読取ったタイミングで、読取りデータを受取る例です。Dim g_Counter As Integer = 0 '受取り個数
Sub Main()
Dim ctrl As Object
ctrl = Cao.AddController( "QR", "CaoProv.DENSO.QRCode", "",
"Conn=com:6:38400:N:8:1, Mode=5, Protocol=0:0:0" )
'受取りイベント名と先の指定
AddHandler ctrl, "OnMessage", OnMessage
g_Counter = 0
'イベントの受信待ちループ
Do
Delay 10
If g_Counter >= 3 Then Exit Do
Loop
'受取りの解除
RemoveHandler ctrl
End Sub
'Event Handler for OnMessage
Sub OnMessage( ByVal Sender As Object, ByVal Args As Variant )
Dim msg as object
msg = Args(0) '::= CaoMessage object
PrintDbg "" & Time & " - CODE = [" & msg.Value & "]"
g_Counter = g_Counter + 1
End Sub
ID : 5769