- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：VB 6.0でtimerをとselect caseを使ったプログラムの続きで質問です。）
VB 6.0でtimerをとselect caseを使ったプログラムの続きで質問です
このQ&Aのポイント
- VB 6.0でtimerを使ったプログラムの続きで、信号機の表示にあわせてイメージを動かしたいのですが、初期位置にイメージを戻すことができません。
- Timer2.Tagの値によって処理を分岐させて、イメージの位置を変更していますが、指定の範囲では初期位置にイメージを戻すようになっているはずなのに、動き続けてしまいます。
- 初期位置にイメージを戻すためのコードの修正方法を教えていただきたいです。
- NIRVAN
- お礼率58% (10/17)
- Visual Basic
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
Timer2.Tagがどのような値になるか考えて見ましょう デザイン時に Tagに何も設定されてないのであれば 最初の実行文で "0"が代入されます となると Case "6" to "11" の条件に合いませんので Case Else節が実行されます このElse節の最後で "0"を代入してしまっているので 次回にも "1"なので"6"と"11"の条件に合わないためElse節しか実行されません よって修正するには Case "6" to "11"節の最後で Timer2.Tag="0" を実行 Else節の Timer2.Tag="0" は削除またはコメントアウトしましょう
お礼
解決できました。ありがとうございました！