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

解決

からすもり  2010-10-29 01:50:53  No: 102632  IP: 192.*.*.*

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

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

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


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

編集 削除
魔界の仮面弁士  2010-10-29 09:14:35  No: 102633  IP: 192.*.*.*

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

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

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

編集 削除
からすもり  2010-10-29 09:42:28  No: 102634  IP: 192.*.*.*

魔界の仮面弁士様

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

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

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

編集 削除
からすもり  2010-10-29 09:44:12  No: 102635  IP: 192.*.*.*

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

編集 削除
からすもり  2010-10-29 10:06:03  No: 102636  IP: 192.*.*.*

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

編集 削除
魔界の仮面弁士  2010-10-29 10:24:24  No: 102637  IP: 192.*.*.*

訂正：

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

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

編集 削除