VB 在文本框中输入a b两个数，判断a是不是b的倍数，将判断结果显示在标签框中。

Question

VB 在文本框中输入a b两个数，判断a是不是b的倍数，将判断结果显示在标签框中。提示：将函数过程定义为逻辑型，在函数过程体中赋给函数true或false
求大神指点！

Answer 1

这个可以用模除为零判断，假定是倍数返回true,基本代码如下：
private function fun(a as long,b as long) as boolean
fun=false
if a mod b=0 then
fun=true
end if
end function
可以根据实际需要在你的程序里进行适当修改