スキルアップ・問題解決なら、モーグにおまかせ！

●概要●
Jetデータベースエンジンの状態を取得するには、ISAMStats関数を利用します。

●詳細●
取得できる情報は、以下の６つです。

　・ディスク読み取り数 
　・ディスク書き込み数 
　・キャッシュからの読み取り数
　・先読みキャッシュからの読み取り数
　・ロックの実行数
　・ロックの解除数

以下のサンプルは、イミディエイトウィンドウに、カレントデータベースの状態を出力します。

●サンプルプログラム●
Sub GetJetStatus()
    Debug.Print "ディスク読み取り数：" & ISAMStats(0)
    Debug.Print "ディスク書き込み数：" & ISAMStats(2)
    Debug.Print "キャッシュからの読み取り数：" & ISAMStats(3)
    Debug.Print "先読みキャッシュからの読み取り数：" & ISAMStats(4)
    Debug.Print "ロックの実行数：" & ISAMStats(5)
    Debug.Print "ロックの解除数：" & ISAMStats(6)
End Sub