VB.NET怎么位運算?

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

網(wǎng)站建設(shè)哪家好，找創(chuàng)新互聯(lián)建站！專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、微信平臺小程序開發(fā)、集團企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了峨山縣免費建站歡迎大家使用！

100分 急求在vb.net中怎樣進行位操作

用bitarray類和BitVector32類實現(xiàn)

VB實現(xiàn)大致如下：

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?'這樣數(shù)據(jù)肯定是-398

Next

....

VB.net，小數(shù)點直接進一位的函數(shù)?

'自定義一個函數(shù)：功能是給小數(shù)直接進一位

'num 　要操作的小數(shù)

'n　保留幾位小數(shù)，

Function getNumber(num As Double, n As Integer) As Double

Dim a As Double

a = Int(num * (10 ^ n)) / (10 ^ n)

If a = num Then

getNumber = a

Else

getNumber = a + 1 / (10 ^ n)

End If

End Function

-------------------------

調(diào)用一下：

Private Sub Command1_Click()

MsgBox (getNumber(3.1415926, 2))

End Sub

得到3.15

vb.net里四舍五入用什么函數(shù)

使用Math.Round()，注意返回值可能為Double或Decimal。

如果取整，第二個參數(shù)不填或者填0

默認(rèn)采用 四舍六入五成雙，如果想四舍五入，請采用MidpointRounding.AwayFromZero作為第三個參數(shù)

Dim?數(shù)字?As?Double?=?2.45

Dim?r1?As?Double?=?Math.Round(數(shù)字,?1,?MidpointRounding.ToEven)?'??r1?=?2.4?四舍六入五成雙

Dim?r2?As?Double?=?Math.Round(數(shù)字,?1,?MidpointRounding.AwayFromZero)?'?r2?=?2.5?四舍五入