VB初心者友の会 - はじめたばかりの人専用Q&A掲示板過去ログ

> 実行を押してから5分置きとか10分置きとかというふうに時間置きにデータを取りこむ
> プログラムを作ろうとしているのですが、どのようにしたらいいのですか？
> Time関数を使っていたのですが、うまく出来ませんでした。
> 他にいい関数とかアドバイスを教えて下さい。よろしくお願い致します。

タイマコントロールを使ってみてください。
Intervalプロパティに設定した時間毎にTimerイベントが発生します。
そこにデータを取りこむ処理を入れれば良いでしょう。

カルテ１：症状
・Timer コントロールでは設定できないくらいの間隔で、周期的に処理を行いたい。

カルテ２：診断
・Time 関数で試した、との事だが、時間をチェックするだけで無限ループになるようなコーディング
は避けるべきであろう。 また、日替わりも考慮すると、時刻だけでなく日付にも対処しないといけな
いのではないだろうか。

カルテ３：処方
・Timer コントロールを利用するサンプルを投与する。　参考にされたい。
・尚、Timer コントロールの Interval プロパティは、1000 や 10000 のように設定し、Enabled 
は False に設定しておく事。

Dim dwTime As Date

Private Sub Command1_Click()
    dwTime = Now
    Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
    If dwTime <= Now Then
        Print CStr(Now)
        dwTime = DateAdd("n", 5, dwTime)    '５分後
    End If
End Sub