OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
締切り
済み

クリスタルレポートでの出力時間の設定

  • すぐに回答を!
  • 質問No.156557
  • 閲覧数137
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 0% (0/16)

VB5のクリスタルレポート5を使っているのですが、出力時間を取得したいんですけどどうしたらいいのでしょうか??やり方がわかりません誰かわかる方私に教えてください
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

回答 (全1件)

  • 回答No.1
レベル12

ベストアンサー率 65% (276/422)

帳票印刷にかかる時間を取得したいのですね? プログラムのモジュールの先頭と、印刷を行っている関数の中に、下のプログラムを参考に追加してみてください。 1000分の1秒の単位で処理時間を取得することができます。 Option Explicit ’プログラムの先頭にWindowsAPIを呼び込む宣言を行う Private Declare Function timeGetTime Lib &quo ...続きを読む
帳票印刷にかかる時間を取得したいのですね?
プログラムのモジュールの先頭と、印刷を行っている関数の中に、下のプログラムを参考に追加してみてください。
1000分の1秒の単位で処理時間を取得することができます。

Option Explicit
’プログラムの先頭にWindowsAPIを呼び込む宣言を行う
Private Declare Function timeGetTime Lib "winmm.dll" Alias "timeGetTime" () As Long



Sub Main()
  '経過時間算出ワーク変数
  Dim lngTime as Long
  
  ''''ここに何らかの処理
  
  ’開始前の時間を取得
  lngTime = timeGetTime
  ’帳票を印刷
  Report1.PrintReport
  ’処理時間の出力
  Debug.Print "処理時間は" & lngTime - timeGetTime &"msです"
End Sub


このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ