大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
好吧,我承认,我没见过。不过不排除是用VB.NET所写的插件。因为VB6是不支持运算符重载的。既然能够自定义运算符,那肯定是跟插件有关。或许他是用宏,或者其他什么东西完成的。。。我没看见过,所以不敢妄下结论。希望你能把这个文件发到我的邮箱里。。。。如果有的话。。。。我邮箱xtnxing@sina.com,可以研究研究。
创新互联主营赤峰林西网站建设的网络公司,主营网站建设方案,app开发定制,赤峰林西h5微信小程序定制开发搭建,赤峰林西网站营销推广欢迎赤峰林西等地区企业咨询
double是双精度 有效数值位52位 表示成指数的形式 即指数11位 即表示成
所以180.89305用2进制表示是10110100.1110010010011110111011001011111110110001010110110101
即
180.89305在double中存在的实际数值是
1.01101001110010010011110111011001011111110110001010110110101 *2^7
取小数点后 52位有效值后 等于10进制的180.893049999999998
所及加最后变成了 1808930.99999999998
第一次当然输出近似值1808931
第二次int函数去掉了小数点后的数int就是只取整数的部位的不是四舍五入 所以少了1
Not一个数值实际上是对这个数值进行“非”运算,即转换为2进制,0变为1,1变为0,你可以这样试:
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
简单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
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
VB中通过Mod方式求余比如:Dim r as Integer '定义一个整型变量r
r = 50 Mod 4 '求50除以4的
余数
,赋值给变量r补充:VB中取余
运算符
是Mod