vb.net按位操作,vb 按位与

VB.NET中怎样实现位运算

TextBox1.Text = 7 And 10

TextBox1.Text = 7 Or 10

TextBox1.Text = 7 Xor 10

TextBox1.Text = Not 10

TextBox1.Text = 7  10

TextBox1.Text = 7  10

如这些,我在VB.Net中也找不到shl和shr运算符~

不过可以通过"自定义运算符"来写出我们想要的功能

相关问答

Q1: vb.net 1

1左移10位，1后面加10个0

结果就是：10000000000

五、按位运算符

注意不能在VB.Net中直接使用以下二进制数，使用时需转换为相应的十六或十进制数字。

1. 表示按位左移，空缺处补0。如：101101 2 结果为 110100

2. 表示按位右移，如：101101 2 结果为 001011

Q2: vb.net 中 逻辑与 ，按位与都可以用 And 表示，能用& 和&&吗？

vb6.0中也有，

数字 就是让这个数字为long型（隐式声明Long 数据类型）

这就显然是令数字0为long型的意思

如果不加就会默认是integer型

有很多作用

c=a b 就是把a和b以字符串形式连接起来并赋给c

如果只是要将其它类型数据转换为字符串只要用cstr(变量)就行了

dim x 在定义的时候就是把变量x定义为long型,就像 dim x as long 一样的效果

H十六进制数 的H表示后面的是十六进制数,还有O是表示后面的是八进制数

VB中不能用。

VB也可以按位与运算的。

x=15 and 8的值就是8。

VB中的And可以表示按位与，也可以表示逻辑与，就看参与运算的量是什么类型的了。

Q3: 100分 急求在vb.net中怎样进行位操作

用bitarray类和BitVector32类实现

VB实现大致如下：

Imports System.Collections.Specialized

...

Dim bvData as BitVector32

Dim sec1 As BitVector32.Section = BitVector32.CreateSection(255)

Dim sec2 As BitVector32.Section = BitVector32.CreateSection(255,sec1)

Dim sec3 As BitVector32.Section = BitVector32.CreateSection(255,sec2)

Dim sec4 As BitVector32.Section = BitVector32.CreateSection(255,sec3)

Dim Buf(4096) as Byte 'receive byte size matched with DSP send data: 1024*4Byte

Dim recCount as Integer

Dim Data(1024) as long

....

For recCount = 0 To 1023

bvData(sec4) = buf(recByte*4)

bvData(sec3) = buf(recByte*4+1)

bvData(sec2) = buf(recByte*4+2)

bvData(sec1) = buf(recByte*4+3)

Data(recCount) = bvData.Data '这样数据肯定是-398

Next

....