Case MSCommLib.OnCommConstants.comEvCD Case MSCommLib.OnCommConstants.comEvCTS Case MSCommLib.OnCommConstants.comEvDSR Case MSCommLib.OnCommConstants.comEvRing Case MSCommLib.OnCommConstants.comEvReceive
MsgBox(AxMSComm1.Input)
Case Else MsgBox("エラー") End Select ----------------------------------------------
分類:[.NET]
はじめまして。
RS-232CとMSCommLibの初心者です。
VB.NETでMSCommLibを使用して発信者番号を取得する
プログラムを作成していたのですが、受信を取得することが
出来たのですが、受信内容を正常に取得出来ない状態です。
少々長くなってしまい、恐縮ですが、下記のように
プログラムを書いています。
----------------------------------------------
1:初期化
AxMSComm1.CommPort = 1
AxMSComm1.Settings = "9600,n,8,1"
AxMSComm1.Handshaking = AxMSComm1.Handshaking.comNone
AxMSComm1.RTSEnable = False
AxMSComm1.RThreshold = 1
AxMSComm1.SThreshold = 1
・
・
・
AxMSComm1.PortOpen = Not AxMSComm1.PortOpen
2:OnComm時
Select Case AxMSComm1.CommEvent
Case MSCommLib.OnCommConstants.comEvCD
Case MSCommLib.OnCommConstants.comEvCTS
Case MSCommLib.OnCommConstants.comEvDSR
Case MSCommLib.OnCommConstants.comEvRing
Case MSCommLib.OnCommConstants.comEvReceive
MsgBox(AxMSComm1.Input)
Case Else
MsgBox("エラー")
End Select
----------------------------------------------
上記プログラムでOnComm時に、メッセージボックスに
「vj・」と、文字化け?のようなものが表示されます。
こちらの原因がプログラムであるかわからなく、困り果てております。
設定の問題でしょうか。
ご助言、どうぞ宜しくお願い致します。