在大部分语言(c、c++、c#、java、vb.net、php等)中，求余的结果的正负与被除数相同。
10年积累的成都做网站、成都网站制作、成都外贸网站建设经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先做网站设计后付款的网站建设流程，更有水磨沟免费网站建设让你可以放心的选择与我们合作。
因此，-13%5的结果是-3。
但对于python，结果是2。
因为对于python而言，是这样算%的结果的：
a%b=a-(a//b*b)
a//b表示a除以b的整数部分，是向下取整，即向负无穷大方向取整。
因此，-13//5等于-3，而-13%5=-13-(-13//5*5)=-13-(-3*5)=-13-(-15)=2。
所以，-13%5的结果要看语言而定，一般是-3。
代码如下，自己根据情况修改假设textbox1是文本框名 Label17.Text = Val(TextBox1.Text) Mod 3
VB6中Mod 运算符功能是两数相除求余。
如果两数中带小数，Mod 会先四舍六入取整，再按整数求余，余数带小数的话只取整数部分。
注意，如果有书说四舍五入，是错的。
在 VB6 用的是所谓银行家算法，是四舍六入：
小数部分比 0.5 小就舍(例如0.4，0.49999)，比 0.5 大就进(例如0.6，0.500001)，
刚好是 0.5 可能舍可能进，如果小数点前面是偶数就舍(例如2.5 得 2)，是奇数就进(例如3.5 得 4)。
Mod 运算符在VB.NET中有改动，余数可以带小数。
以上资料来自：
所以2.5 mod 2结果是0
ss.Tables(0).Rows.Count这句的意思是计算table（0）中的记录的行数。而你要判断的是读出的数据Balance的值是否大于2.因此应该将此句改为：
if ss.tables(0).Rows(0).item(1)2 then’你在查询语句中只查了UserID和Balance这两项，因此Item（0）是UserID，Item（1）就是Balance了。
msgbox("余额不足")
end if
这里假定保存余额数据的表中每个用户ID下有且只有一条记录。如果可能没有记录或有两条以上的记录，则应加判断语句，以让程序运行更稳妥。
例如可以用 If ss.Tables(0).Rows.Count 1 Then‘小于1表示查询出的记录为零，即没有符合条件的记录。
MsgBox("没有此用户的余额记录，请核对用户名。")
end if
没有比这个更简单的了
Richtextbox1.text = Regex.Replace(Richtextbox1.text, " (\/\s*)?((\w+:)?\w+)(\w+(\s*=\s*(([ " " '])(\\[ " " ' 'tbnr]|[^\7])*?\7|\w+)|.{0})|\s)*?(\/\s*)? ", String.Empty)
