MSCommの通信エラーをクリアするには？ (ID:106590)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 取りあえず下記の２行追加かな。 Do '受信内容チェック Recv_Wrk = Main_Form.MSComm.Input Recv_Buf = Recv_Buf & Recv_Wrk If Recv_Wrk = "" Then Exit Do Else <=追加 Err_Msg="" <=追加 End If DoEvents Loop PS.5年ぶりにGotoをみたけど....。