時間が経過したら、自動的に消えるようにするには？

解決

からすもり 2010-10-29 10:50:53 No: 102632

こんばんは。
VB6.0で作成しています。

Formを開いてから３分後にframe1を消すようなプログラムを作成したいと思っています。

“Time_Flag = False”を使用することまでしか分かりませんでした。

どのようにプログラムを打ったらいいかヒントや、方法をご教示の程よろしくお願いします。

魔界の仮面弁士 2010-10-29 18:14:35 No: 102633

Timer コントロールを使いましょう。

タイマーを Timer1.Enabled = True で開始する直前に、
今から 3分後の時刻を『DateAdd("s", 3, Now)』等で求め、
それを変数に保持しておきます。

Timer イベントの中では、その時刻と Now を比較し、
Now の方が大きかった時に、タイマーの停止(Timer1.Enabled = False)と
フレームの非表示(Frame1.Visible = False)を実施するようにします。

からすもり 2010-10-29 18:42:28 No: 102634

魔界の仮面弁士様

分かりやすく説明していただいて、ありがとうございます。

イメージが掴めました！魔界の仮面弁士様のおかげでプログラムが出来そうです！

本当にありがとうございます。

からすもり 2010-10-29 18:44:12 No: 102635

チェック忘れてました。
ありがとうございます。

からすもり 2010-10-29 19:06:03 No: 102636

何度もすいません。
有難うございました。

魔界の仮面弁士 2010-10-29 19:24:24 No: 102637

訂正：

> 今から 3分後の時刻を『DateAdd("s", 3, Now)』等で求め、

"s" ではなく、"n" を指定してください。