用vb.net進(jìn)行邏輯“與”運(yùn)算的代碼如下，請(qǐng)大神幫忙看看哪里不對(duì)

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

讓客戶滿意是我們工作的目標(biāo)，不斷超越客戶的期望值來(lái)自于我們對(duì)這個(gè)行業(yè)的熱愛(ài)。我們立志把好的技術(shù)通過(guò)有效、簡(jiǎn)單的方式提供給客戶，將通過(guò)不懈努力成為客戶在信息化領(lǐng)域值得信任、有價(jià)值的長(zhǎng)期合作伙伴，公司提供的服務(wù)項(xiàng)目有：域名注冊(cè)、網(wǎng)頁(yè)空間、營(yíng)銷軟件、網(wǎng)站建設(shè)、鄲城網(wǎng)站維護(hù)、網(wǎng)站推廣。

Dim i, p As Integer, c, d As String

c = Trim(TextBox1.Text)

d = Trim(TextBox2.Text)

ReDim A(c.Length - 1)

ReDim B(d.Length - 1)

For i = 0 To c.Length - 1

A(i) = c.Substring(i, 1)

Next

For i = 0 To d.Length - 1

B(i) = d.Substring(i, 1)

Next

m = A.Length

n = B.Length

If m = n And m 0 Then

ReDim F(m - 1)

Label3.Text = "F="

For i = 0 To m - 1 Step 1

If A(i) = "1" And B(i) = "1" Then

F(i) = 1

Else

F(i) = 0

End If

Label3.Text = F(i)

Next i

Else

If m = 0 Or n = 0 Then

MessageBox.Show("輸入不能為空！", "錯(cuò)誤提示")

Exit Sub

Else

MessageBox.Show("字符串長(zhǎng)度不一致", "錯(cuò)誤提示")

Exit Sub

End If

End If

End Sub

VB.net的開(kāi)方運(yùn)算

VB的運(yùn)算順序是：先乘除、后加減，有括號(hào)的先算括號(hào)內(nèi)，有負(fù)號(hào)的先算負(fù)號(hào)。

請(qǐng)你比較一下這個(gè)運(yùn)算中x和y的值：

Dim n As Single = 4

Dim x As Single

Dim y As Single

x = n + 1

x = x / n

x = x - 1

x = Math.Sqrt(x)

y = Math.Sqrt((n + 1) / n - 1)

這樣就會(huì)發(fā)現(xiàn)，你的代碼中括號(hào)的位置錯(cuò)了。

正確的應(yīng)該是： Math.Sqrt((n + 1) / n - 1)

vb.net 中 邏輯與 ，按位與都可以用 And 表示，能用& 和&&嗎？

vb6.0中也有，

數(shù)字 就是讓這個(gè)數(shù)字為long型（隱式聲明Long 數(shù)據(jù)類型）

這就顯然是令數(shù)字0為long型的意思

如果不加就會(huì)默認(rèn)是integer型

有很多作用

c=a b 就是把a(bǔ)和b以字符串形式連接起來(lái)并賦給c

如果只是要將其它類型數(shù)據(jù)轉(zhuǎn)換為字符串只要用cstr(變量)就行了

dim x 在定義的時(shí)候就是把變量x定義為long型,就像 dim x as long 一樣的效果

H十六進(jìn)制數(shù) 的H表示后面的是十六進(jìn)制數(shù),還有O是表示后面的是八進(jìn)制數(shù)

VB中不能用。

VB也可以按位與運(yùn)算的。

x=15 and 8的值就是8。

VB中的And可以表示按位與，也可以表示邏輯與，就看參與運(yùn)算的量是什么類型的了。

VB.NET怎么位運(yùn)算?

注意只能對(duì)整型執(zhí)行按位運(yùn)算。浮點(diǎn)值必須轉(zhuǎn)換為整型后，才能執(zhí)行按位運(yùn)算。按位運(yùn)算采用二進(jìn)制（以 2 為基）形式計(jì)算兩個(gè)整數(shù)值。它們比較對(duì)應(yīng)位置上的位，然后基于比較的結(jié)果賦值。下面的示例演示了 And 運(yùn)算符。復(fù)制Dim x As Integerx = 3 And 5 前面的示例將 x 的值設(shè)置為 1。發(fā)生這種情況的原因如下：這些值以二進(jìn)制形式處理：二進(jìn)制格式的 3 為 011二進(jìn)制格式的 5 為 101And 運(yùn)算符比較這些二進(jìn)制表示方式，一次比較一個(gè)二進(jìn)制位置（位）。如果給定位置的兩個(gè)位都為 1，則將 1 放在結(jié)果中的該位置。如果任何一個(gè)位是 0，則將 0 放在結(jié)果中的該位置。在前面的示例中，按如下所示計(jì)算結(jié)果：011（二進(jìn)制格式的 3）101（二進(jìn)制格式的 5）001（二進(jìn)制格式的計(jì)算結(jié)果）計(jì)算結(jié)果以十進(jìn)制形式處理。值 001 是 1 的二進(jìn)制表示形式，因此 x = 1。除了在任何一個(gè)比較位是 1 或兩個(gè)比較位都是 1 的情況下將 1 賦予結(jié)果位以外，按位 Or 運(yùn)算與此類似。Xor 在比較的位正好只有一個(gè)是 1（而不是兩者都是 1）時(shí)將 1 賦給結(jié)果位。Not 采用單個(gè)操作數(shù)并反轉(zhuǎn)所有位（包括符號(hào)位），然后將該值賦予結(jié)果。這意味著，對(duì)于有符號(hào)正數(shù)，Not 始終返回負(fù)值，而對(duì)于負(fù)數(shù)，Not 始終返回正值或零。AndAlso 和OrElse 運(yùn)算符不支持按位運(yùn)算。 追問(wèn)： 好復(fù)雜啊...還是不會(huì),還有整數(shù)怎么轉(zhuǎn)換為二進(jìn)制數(shù)? 回答： 為什么一定要用位運(yùn)算呢，你那個(gè)乘法只能通過(guò)左移操作符“ ”來(lái)進(jìn)行，而左移一次代表乘以2，要是乘以一個(gè)小數(shù)，就必須先化成2的n次方，不夠再用加減法調(diào)整，很麻煩啊，沒(méi)必要用位運(yùn)算啊。。。 追問(wèn)： 因?yàn)槲乙M(jìn)行大量的運(yùn)算,但速度要快,所有用位運(yùn)算...我也不想啊.. 回答： 那就不該用VB 啊，c/c++在執(zhí)行效率上是沒(méi)話說(shuō)的。 追問(wèn)： 問(wèn)題就是不會(huì)嘛... 回答： 那你上csdn上發(fā)帖效果應(yīng)該不錯(cuò) 追問(wèn)： CSDN發(fā)了,我發(fā)在高性能運(yùn)算,沒(méi)人... 回答： 耐心一些，或者你應(yīng)該發(fā)到VB.NET論壇那里。。。 追問(wèn)： 額..只能這樣了... 提問(wèn)者 的感言： 太復(fù)雜了..算了 2010-11-08