VB 判断一个数是否在限定的范围内因为我数据是一笔笔的汇总(a),和理论总数(b 有一些相差.有没有办法做个比较函数1.限定的范围可以设如：±2(y)2.没超过范围 返回 ture,超出就返回 False格式如

Question

VB 判断一个数是否在限定的范围内
因为我数据是一笔笔的汇总(a),和理论总数(b 有一些相差.有没有办法做个比较函数
1.限定的范围可以设如：±2(y)
2.没超过范围 返回 ture,超出就返回 False
格式如：比较函数（a,b,y ）=False
比较函数(10,5,2)=False
比较函数(3,5,2)=ture
比较函数(7,5,2)=ture
比较函数(2,5,2)=False
If sumyl > Val(Text1.Text) + 2 Or sumyl < Val(Text1.Text) - 2 Then

Answer 1

Private Function CompareNum(ByVal a As Long,ByVal b As Long,ByVal y As Long) As Boolean'如果涉及小数,需要将long改成single或double
If Abs(a - b)