Timerの使い方について (ID:126340)

名前

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

本文 RS-232C接続でパソコンとシーケンサの通信を行っています。 タイマーを使って、一定時間内に受信を行わなければ メッセージボックスを出すようにしているのですが シーケンサの電源を切って、返答がない状態にして startbottonをクリックしても、メッセージボックスが現れません。 何が原因でしょうか？よろしくお願いします。 Private Sub Timer1_Timer() MsgBox "一定時間内に受信できませんでした。" Timer1.Enabled = False End Sub Private Sub startbotton_Click() Timer1.Enabled = True MSComm1.Output = "00FFBW0M0903050000023" End Sub Private Sub MSComm1_OnComm() Timer1.Enabled = False 'タイマーの解除 End Sub