初期状態に戻すには?


SHIBU  2002-06-19 11:00:49  No: 104409  IP: [192.*.*.*]

プログラムを作っていてCommand1を押すとLabelの文字などが変わり"取り消しボタン(Command2)"を作ってもとのLabelの文字に戻したいのですがその取り消しボタンに入れるいい命令などなにかありませんか?

編集 削除
Say  2002-06-19 13:19:51  No: 104410  IP: [192.*.*.*]

Private mstrBuf As String
Private Sub Command1_Click()
    mstrBuf = Label1.Caption
    Label1.Caption = "あたらしいもじ"
End Sub
Private Sub Command2_Click()
    Label1.Caption = mstrBuf
End Sub

編集 削除