[VBA]短絡評価 処理速度の変化について下記は、条件判定の行い方により速度が変わるというサンプルです。 [前提条件] １．3の倍数、3が付く数字であるかを判定。 ２．4の倍数の時は、評価しない。 ※ 3が付く数字の評価では、2秒の待機を行っています。 [比較条件］ サンプルＡ ３つの判定を同時に行っています。 サンプルＢ 4の倍数であるかの判定を行った後、 3の倍数、3が付く数字であるかを判定。 ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊ Option Explicit 'Win32 API Sleep関数を有効にする。 Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'メイン関数(実行する関数) Public Sub Main() Const MAX_NUM = 12 '最大ループ回数 Dim i As Long 'ループ
![[VBA]短絡評価 処理速度の変化について](https://cdn-ak-scissors.b.st-hatena.com/image/square/58fbd58266fb8fb8b1e8087f777b7e1dc8d12216/height=288;version=1;width=512/https%3A%2F%2Fimg01.ti-da.net%2Fusr%2Fitpoino%2F%25E7%259F%25AD%25E7%25B5%25A1%25E8%25A9%2595%25E4%25BE%25A1.PNG)
