ボタンに張り付いた画像を切り替えるには？ (ID:124951)

名前

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

本文 さささん、通ってみたさんありがとうございます。半分だけうまくいきました。（試したのはファイルからの方法です。） 以下のように記述していて、最初に▼→■にはなるのですが、■→▼に戻りませんIf分がおかしいのでしょうが、何かいい判断方法はありますか？ Dim w_start, w_stop As String start = CurDir & "\start.gif" stop = CurDir & "\stop.gif" If Command1.Picture = LoadPicture(stop) Then Command1.Picture = LoadPicture(start) Else Command1.Picture = LoadPicture(stop) End if またPictureBoxというのも気になります。初心者がわかるようなサイトあったら教えていただけませんか？ End If