If 2*(a And b) > 0 Then
Text2.Text = "a and b>0"
else
Text2.Text = "a and b<=0"
End If
则Text2.Text = "a and b<=0"好玩,谁遇到过?
Text2.Text = "a and b>0"
else
Text2.Text = "a and b<=0"
End If
则Text2.Text = "a and b<=0"好玩,谁遇到过?
解决方案 »
- 在VB中利用函数StretchPicture将图片Picture1.Picture转换为图片Picture2.Picture,那么如何保存转换后的图片Picture2.Picture呢?
- VB如何识别扫描证件所得图片中的文字信息!
- textbox控件读取问题:(急)
- 欢迎试用“Henst i-HRMS 恒思特Internet人事工资管理系统”/
- word 问题 (在线等待)问题解决家分
- 网络编程低手勿扰
- 求教RegCreateKeyEX()函数的用法
- 一个高难度的VB问题
- 讨论:是否源码所有权=版权 (发言者有分)
- 能不能举一个使用FetchComplete, FetchProgress事件的例子,我在msdn中找不到示例
- 这样会不会锁表!
- !!!请大家来解决一个大问题
0x249 and 0x2000=1 ?!你会数学吗?
这句有问题,是因为优先级的事,在VB里“>”的优先级比“and”高,所以这个式子变成
if a and (b>0) then 了
也就是
a>0 相当于True, B>0 也等于True
True And True 结果等于True
所以结果是正确的。
Text2.Text = "a and b>0"
else
Text2.Text = "a and b<=0"
End If
这个题,在VB里True值等于-1
2*-1 是小于0的。 也没错。
这叫BUG?我要晕了,别扶我!!
a And b > 0 =585
a And b > 0 =585
(a And b) > 0 =false
多动点脑子,少谈论些主义。