Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

36096 / 76732

←次へ　｜　前へ→


	【45821】Re:Dimについて

tomo - 07/1/15(月) 13:29 -


	引用なし

	パスワード

▼neptune さん：
>Public Declare Function timeGetTime Lib "winmm.dll" () As Long
>
>Private T1 As Long, T2 As Long
>
>Sub t()
>Dim a() As Long
>
>　　T1 = timeGetTime
>　　ReDim a(10)
>　　T2 = timeGetTime
>　　Debug.Print "要素数10　　：　" & (T2 - T1) / 1000 & " Sec"
>　　T1 = timeGetTime
>　　ReDim a(1000000)
>　　T2 = timeGetTime
>　　Debug.Print "要素数1000000：　" & (T2 - T1) / 1000 & " Sec"
>
>End Sub
すいません。教えて下さい。
上記のｺｰﾄﾞはどう利用するのですか？

0 hits

▼

【45816】Dimについて tomo 07/1/15(月) 8:35