Not一个数值实际上是对这个数值进行“非”运算，即转换为2进制，0变为1，1变为0，你可以这样试：
双峰网站制作公司哪家好，找成都创新互联公司！从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设公司等网站项目制作，到程序开发，运营维护。成都创新互联公司2013年开创至今到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选成都创新互联公司。
For i = 1 To 10
s = i
debug.print not (i Mod 5 )
Next
这样可以看到not (i Mod 5 )这个表达式究竟等于多少。
按照你的想法，应该这样做结果才是对的：
If Not (i Mod 5 0) Then
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
在大部分语言(c、c++、c#、java、vb.net、php等)中，求余的结果的正负与被除数相同。
因此，-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
抱歉，不会VB.NET,不过可以提供点思路
二进制表示为0或1
整数型(有正负号范围0-32768，无正负号0-65535）
将整数型资料连除2，将每次的余数由右到左排列，即为所得
简单VB2010程序（命令行上的）：
Class Module '程序开头（自动会加的）
Dim a as integer '声名变量a为整型（整数）
Sub Main() '本程序（自动加的）
Console.Readln(A) '读取变量a的值（键盘打2）
Console.Writeline(A) '输出a的值（屏幕上出现2，也就是a）
End Sub ‘程序结束(自动加的)
End Class ‘程序结尾（自动加的）
要学VB先学Basic语言，非常简单，我猜是最简单的了。
解释变量：是一个单词或字母（不能用中文），除了语句用的单词，变量的值可以变，如：A等于1，如果写A=A+1的话，A就会给自己的值加上1，变成2.
基本运算符号：
+加，-减，*乘，/除，mod取余数。
=等于，不等于，大于,小于,=大于或等于,=小于或等于。
逻辑运算：
not不、否，and和,or或， xor异或（详情后面解释）,一般XOR不会用到，除非做数学或画图。
变量类型：
integer整数,string字符串,char字符,single数位少的小数,double精度高（数位多）的小数，decimal非常多个数位的小数，boolean布尔：分真(True)与假(False)
数学成绩好吗（最低要求90,高要求95 or =100）？把学的东西用上去。
Not:
Not True(真)=False(假),不真等于假，显然，不假等于真。
And:
真和真等于真，只要有一个假，全假。
Or:
只要有一个真，全真，全是假，就是假。
Xor:
全是真的话，那结果是假，其他的跟Or一样。
再加一句，编程主要是人人讨厌的数学，英语也得好，编程语言不重要。
邮箱：ltntec@hotmail.com
