![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
No.3ベストアンサー
- 回答日時:
正確なミリ秒を取得する方法は、あるのかもしれませんが一般的にはよく知られていませんし、私も知りません。
しかし、1秒よりも小さい数字を取得する方法が無いわけでもありません。
以前に私が取った方法は、以下のような方法です。
Timer関数を使って、午前0時からの経過秒数を取得します。これは、実際には単精度浮動小数点数型で帰ってくるので、小数点以下の数値があります。
この数値を取り出して、1秒以下を表すのは可能です。
ただし、あくまで前後を把握するための参考程度でしょう。
この数値から、「時:分:秒.それ以下」という文字列をつくれば、それっぽい表示が可能です。
ちなみに、判るとは思いますが、それぞれの算出方法は次の通りです。
total_Sec = Timer '午前0時からの経過秒数(単精度浮動小数点数型)
'時の取得
h = CStr(Int(total_Sec / 3600))
'分
m = CStr(Int((total_Sec - 3600 * h) \ 60))
'秒
s = CStr(Int(total_Sec - 3600 * h - 60 * m))
'1秒以下
under_s = CStr(total_Sec - 3600 * h - 60 * m - s)
私は、これにそれぞれの桁をそろえる自作関数を合わせて使っていました。
No.1
- 回答日時:
Public Declare Function GetTickCount Lib "KERNEL32" ()As Long
標準モジュールでこれを宣言してください。
ms = GetTickCount
などとすることで、Windowsが起動してからの時間(ミリ秒)が取得できますので、あとは割り算などで好きなフォーマットにすればよいと思います。
この回答への補足
さっそくのお返事ありがとうございます。
Windowsが起動してからの時間ってTime関数と同じ時間をさしますか?
(ミリ秒だけではなくhh:mm:ss:○○といったふうに取得したいのですが・・・)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(パソコン・スマホ・電化製品) pthonのframeに演算結果(数値)を表示したい 1 2023/06/05 22:08
- Visual Basic(VBA) VBA。複数のChangeイベントをまとめる方法 2 2022/03/31 12:03
- Access(アクセス) エクセルのVBAについて教えてください。 4 2023/01/21 10:21
- Excel(エクセル) Excelのtextboxへの入力で小数点以下に0が続く場合でも正しく表示したい 3 2022/04/11 13:53
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/01/23 09:24
- Access(アクセス) アクセス where句を使用して複数条件抽出をするには 2 2022/08/29 13:24
- Access(アクセス) アクセス 有効なフィールド名、または式として認識できませんのエラー 3 2022/08/19 11:53
- Excel(エクセル) 出退勤管理の遅刻・早退時間について 3 2023/08/10 15:33
- その他(プログラミング・Web制作) パイソン初心者です 4 2022/06/29 06:49
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2023/01/23 17:13
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
VBAでミリ秒まで出力する方法
Visual Basic(VBA)
-
VisualBasic6.0のFormat関数でmSecを表示したい
Visual Basic(VBA)
-
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
-
4
Excelでミリsecまでの2つの時刻の差を求める方法
Excel(エクセル)
-
5
Access にて mm:ss.0" 形式の 秒数を算出する方法"
その他(データベース)
-
6
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
7
Excelでミリ秒を抜き出す方法
Excel(エクセル)
-
8
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
9
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
10
どこにもフォーカスを当てたくない
Access(アクセス)
-
11
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
12
ListView 項目の選択/選択解除について
Visual Basic(VBA)
-
13
EXCEL VBA で指定した範囲に入力があるかどうか?
Visual Basic(VBA)
-
14
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
15
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
16
【VBA】Worksheet_changeイベントで特定のキーが押されたときだけ無効にしたい
Visual Basic(VBA)
-
17
VBAで○○:○○と表示させたいのに小数で0.53125のように表示さ
Access(アクセス)
-
18
【Excel VBA】 WorksheetやRangeオブジェクトとして宣言した変数の開放は必要でしょうか?
その他(Microsoft Office)
-
19
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
20
オブジェクト型の変数にフォームを入れたい
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ps3で久しぶりにCDの音楽情報取...
-
「取得先」という表現について
-
Yahoo! JAPAN IDを新規取得でき...
-
EXCEL、マクロ-改ページ行番号...
-
PDOを使った総レコード数(行数...
-
グローバルIPの取得方法を教え...
-
Excel VBA:特定の文字列以降(...
-
【VBA】EXCELブックを開かずに...
-
グローバルIPの取得方法
-
ファイル作成者名の取得
-
VBAでPDFのアクティブページ番...
-
iphlpapiのGetAdaptersInfoでNI...
-
VB2005でXMLデータから複数ある...
-
モジュールからルート名前空間...
-
Powershellを使ってパソコンが...
-
ASP(.netではありません)でのUs...
-
VBで他アプリの「syslistview32...
-
(Win32)ファイルパスから物理ド...
-
IPアドレスとMACアドレスを取得...
-
auの個体識別情報を取得したい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
「取得先」という表現について
-
Yahoo! JAPAN IDを新規取得でき...
-
ps3で久しぶりにCDの音楽情報取...
-
IPアドレスとMACアドレスを取得...
-
format関数について
-
Excel VBA:特定の文字列以降(...
-
【VBA】EXCELブックを開かずに...
-
EXCEL、マクロ-改ページ行番号...
-
ローカルのコンピュータ名を取...
-
【C#】FindWindowExの使い方を...
-
VBAでPDFのアクティブページ番...
-
ミュージックのアートワークを...
-
VBS「開いているページ」のURL...
-
VB or VBScriptでPCの製造番号...
-
VBAでPDFファイルの文書のプロ...
-
表示している画面サイズの取得方法
-
積立投資してます。現在平均取...
-
アクセスの度にIPアドレスを変...
-
各クライアントマシンのログイ...
-
VB.NETでボリュームを取得・設...
おすすめ情報