vb.Net编程简介之二（轉）

vb.Net编程简介之二（轉）

lean类型数据使用AND/OR/NOT操作

And和Or关键字在Visual Basic.NET和Visual Basic 6.0中的使

用是不同的，在Visual Basic 6.0中，AND运算既执行逻辑AND操作也执行逐位AND操作，取决于操作数(如果是Boolean类型，执行逻辑AND操作，如果是数字，执行逐位AND操作)。在Visual Basic.NET中，AND运算只执行逻辑AND操作。对于逐位操作，在Visual Basic.NET提供了一组操作：BitAnd, BitOr, BitNot以及BitXor 。

下面是演示这些差异的范例程序

Dim a As Integer

Dim b As Integer

Dim c As Boolean

a = 1

b = 2

c = a And b

MsgBox ("The answer is " & c)

当上面的代码在Visual Basic 6.0下运行时，结果是False(执行

逐位AND操作)；然而在Visual Basic.NET下，结果是True(执行逻辑AND操作)。

要确定你的程序在升级后也运行结果同升级前一样，Visual

Basic.NET包含了兼容函数VB6.And, VB6.Or以及VB6.Not，这些函数执行的结果同Visual Basic 6.0下的AND/OR/NOT操作的执行结果是一样的。当代码升级后，结果会象下面这样：

Dim a As Short

Dim b As Short

Dim c As Boolean

a = 1

b = 2

c = VB6.And(a, b)

MsgBox ("The answer is " & c)