こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

ボタンのcaption切り替え

初めて投稿させていただきます。win2000/VB6でボタンを作成したのですが、このボタンを押した時にボタンのcaptionが切り替わるようにするにはどのよう書けばよいでしょうか?

送信 → 再送信 →送信・・・

※ボタンは同一の物です。
よろしくお願いします。

投稿日時 - 2004-07-22 12:30:37

QNo.935492

すぐに回答ほしいです

このQ&Aは役に立ちましたか?

1人が「このQ&Aが役に立った」と投票しています

回答(3)

ANo.3

>Command2(中止)ボタンがあったとして、このボタンが押されたら、Command1.Caption = "再送信"が
Command1.Caption = "送信"になるように

とりあえず、上記の件の回答です。

Private Sub Command2_Click()
Caption1 = "再送信"
Command1.Caption = Caption1
End Sub

Private Sub Form_Load()
Caption1 = "送信"
End Sub

標準モジュールに
Public Caption1 As Stringを記述しておいて下さい

>Command1.Caption = "再送信"で終了した時に、次に実行した時には"送信"からではなく"再送信"から表示されるようにするにはどうしたらよいのでしょうか?

次にの意味が、プログラムを終了させて、再起動した場合ですか。それとも、プログラムは終了せず、次の送信をおこなった場合ですか?
プログラムの開始時は、無条件に”送信”が表示されればよいのですか?
「”再送信”で終了した時」とは、どんな時でしょうか。この意味が不明です。送信->再送信->送信・・・と繰り返す時、どこで終わったのかが判りません。

投稿日時 - 2004-07-22 18:48:57

ANo.2

送信と再送信を交互に繰り返すなら、以下のように
して下さい。
Private Sub Command1_Click()
If Command1.Caption = "送信" Then
Command1.Caption = "再送信"
Else
Command1.Caption = "送信"
End If
End Sub

投稿日時 - 2004-07-22 12:41:26

補足

回答ありがとうございます。
大変申し訳ないのですが、もう一つ聞きたいのですが、Command2(中止)ボタンがあったとして、このボタンが押されたら、Command1.Caption = "再送信"が
Command1.Caption = "送信"
になるようにしていのと、
Command1.Caption = "再送信"で終了した時に、次に実行した時には"送信"からではなく"再送信"から表示されるようにするにはどうしたらよいのでしょうか?
申し訳ないのですが、ご回答をお願いいたします。

投稿日時 - 2004-07-22 13:05:58

ANo.1

下記のコードでしょうか?
質問の趣旨が違っていたら申し訳ありません。

Private Sub Command1_Click()

Command1.Caption = "送信"
Command1.Caption = "再送信"
Command1.Caption = "送信"

End Sub

投稿日時 - 2004-07-22 12:41:03

あなたにオススメの質問