∇　ウエイトをかける　∇

　　　　　　　　　　　　　　　　　　　　　　　　　プログラムを一時停止(ウエイト)します。Timer等を使ったり
　　　　　　　　　　　　　　　　　　　　　　　　せず、APIを使用しますので、ミリ秒での指定も可能(と・思う)　　
　　　　　
　　　　　　　　　　　　　
　　　　　　　　　　　　　　　
　　　　　　　　　　　　　　　　　　 　　　　SleepというAPIを使用します。　

　　　　　　　　　　　　Private Declare Sub Sleep Lib "KERNEL32" Alias "Sleep" (ByVal dwMilliseconds&)

　　　　　　　　　　　　Private Sub Form_Load()

　　　　　　　　　　　　　　Sleep (1000)

　　　　　　　　　　　　End Sub


　　　　　　　　　　　　　　　　　　　　引数は、 　dwMillseconds&　　ウエイトをかける時間をミリ秒で指定
　　　　　　　
　　　　　　　　　　　　ミリ秒 : 1000=1秒　100=0.1秒　・・・・

---

1999 Copyright(C) Manabu
1999-00 Manabuの部屋 http://www.manabu.uni.cc/
この文章の無断転際を禁じます

楽天モバイル[UNLIMITが今なら1円] ECナビでポインと Yahoo 楽天 LINEがデータ消費ゼロで月額500円〜！

無料ホームページ 無料のクレジットカード 海外格安航空券 解約手数料０円【あしたでんき】 海外旅行保険が無料！ 海外ホテル