VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2004/03/25(Thu) 21:50 |
| 投稿者 | ： ねろ |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re: 時間（タイマー）関数について |
sleepでもいいのですが中断が出来ないという問題と、
バックグラウンドの処理も止まってしまう問題があります。
比較的精度が高く簡単な方法は、APIのTimeGetTime関数を使って
Private Declare Function timeGetTime Lib "winmm.dll" () As Long
Private Sub Command2_Click()
Dim StartTime As Long
StartTime = timeGetTime
Do
DoEvents
Loop While (timeGetTime - StartTime < 5000)
End Sub
とやります、3〜5mSec位の高精度です。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）