Mod 演算子を使用する

  • [アーティクル]
Microsoft Office 2000/Visual Basic プログラマーズ ガイド   

Mod 演算子は、2 つの数値に対して除算を行い、剰余を返します。これは、2 つの数値が均等に分割されるかどうか、または剰余がどの程度であるかを確認する場合に便利です。Mod 演算子は、浮動小数点数または固定小数点数に対して除算を行う場合でも、常に整数型 (Integer) または長整数型 (Long) の値を返します。

たとえば、IsFactor プロシージャは、数値と因数という 2 つの引数を取得し、2 番目の引数が最初の引数の因数であった場合は True を返します。このプロシージャは Mod 演算子を使用して、1 つの値で別の値を剰余なしで除算できるかどうかを調べます。

  Function IsFactor(lngNum As Long, _
                lngFactor As Long) As Boolean
            
   ' 数値が別の数値の因数であるかどうかを確認します。
   
   IsFactor = Not CBool(lngNum Mod lngFactor)
End Function

IsFactor プロシージャは、Office 2000 Developer CD-ROM の ODETools\V9\Samples\OPG\Samples\CH07 サブフォルダに含まれる VBA.mdb の modNumbers モジュールにあります。