タイトル : MScommの通信について2 投稿日 : 2012/06/07(Thu) 20:03 投稿者 : ミロク
お疲れ様です。 ちょっと経験がある方がいらっしゃいましたらご意見を宜しくお願い致します。 PC1(XP)→PC2(XP) (シリアル通信) PC2とのやり取りは下記のようにしています。 MSComm.InputMode = comInputModeText PC PC2 MSComm.CommPort = 2 CommPort = 1 MSComm.Settings = "9600,n,8,1" Settings = "9600,n,8,1" MSComm.Handshaking = comNone Handshaking = comNone MSComm.RThreshold = 1 MSComm.SThreshold = 1 Dim a, b As String a = MSComm.Input-"TEST"と入ってきます。 b = "TEST_OK"と返したいですが.... If a <> "TEST" Then MSComm.Output = b ’MSComm.Output = a -来た値をそのまま返すとPC2側で見れるのですが。 ’bの値は全く受け取ってくれる気配がありません。なんでなんでしょうか?? ’PC2でCOMモニタリングで見る限り正常でした。 End If 何か間違いな点が御座いましたらご指摘の方宜しくお願い致します。 頭パンク状態で基本的な質問をしてしまい申し訳御座いませんが宜しくお願い致します。 |