VB6.0-整数と余りを求める

表題の通り、整数と余りを求める関数を教えてほしいです：例：100/60＝1余り40
整数：１
余り：４０
よろしくお願いいたします。

No.1 ベストアンサー 回答者： laputart 回答日時： 2005/09/07 09:33

Dim A,B,C,D as integer

A=100
B=60
C=Int(A/B) <---答は1
D=A mod B

●IntはAをBで割った時の整数部分を求める関数ですが、答が負の場合は
注意が必要です。 例　Int(-100/40)=-2
これを回避する場合　Fixがいいです

●mod は　A を　B で割った時の余りを求める関数

この回答へのお礼

早速回答をいただき、ありがとうございました。

お礼日時：2005/09/07 10:27

No.3 回答者： naru_fumi2005 回答日時： 2005/09/07 09:57

#2ですが、負の数の余りの演算を間違えたようです。

誤 -22 mod 8 → -2 余り -6

正 -22 mod 8 → -3 余り 2

のようです。

この回答へのお礼

ありがとうございました。

お礼日時：2005/09/07 10:27

No.2 回答者： naru_fumi2005 回答日時： 2005/09/07 09:49

整数を求める関数

Int( 値 ) As Integer
値の整数値を求める。
ここで注意して欲しいのは、正数化すると言うことは、直近下位の正数にすると言うことです。
-- 例 --
Int(1.25) → 1
Int(-2.3) → -3

演算子としては正数同士の割り算であれば \ を使えば整数の除算になります。

剰余を求める関数はあるかも知れませんが、普通は演算子 mod を使用します。
-- 例 --
14 mod 3 → 2
-22 mod 8 → -2 余り -6

※ mod は関数ではなく演算子です。