VB6.0中是否有位移運算子shift operator

各位請問VB6.0中是否有類似C語言中的binary operator?例如將數值內每位bit向左或向右,以改變其內容,謝謝.

ex.

data=&HFFFD (1111 1111 1111 1101)

right shift of one bit.

data=&H7FFE (0111 1111 1111 1110)

已更新項目:

能不能幫我看下面的程式段,我是在寫有關檢查碼的部份,當我輸入check_data n個字元字串時,跑n個i迴圈,以及每個迴圈跑八個j迴圈來得出檢查碼,但是我測試將check_data="2"時,第二個j迴圈的Polynomial數據就開始不對了,這是為何呢?

2 個已更新項目:

Public Function CRC_16(Check_data As String) As Long

Dim i,j As Integer

Dim Polynomial As Long

Dim Checksum As Long

3 個已更新項目:

不好意思,字元不夠另開一個主題詢問各位.

3 個解答

評分
  • 10 年前
    最佳解答

    VB 6.0 並沒有提供內建的 shift operator 喔~

    要自己寫的話也不難,您可以利用「除以2」來代替「右移1位」;「乘以2」來代替「左移1位」,只是要考慮 MSB (負號) 以及溢位等問題。

    Ex:

    Dim data As Long

    data = &HFFFD& ' &HFFFD (1111 1111 1111 1101)

    data = data \ 2 ' &H7FFE (0111 1111 1111 1110)

    希望對您有幫助!

    參考資料: 系統工程師的居酒屋
  • 3 年前

    Vb6 Bit Shift

    參考資料: https://owly.im/baSO8
  • 5 年前

    提供企業全程刊登職缺及轉檔,免費客服解說教做,是人資部第一首選,找工作、找人才,提供24H必回覆、獨家工作、自傳急診室、履歷配對、面試教學、職涯測評、TOEIC線上模擬考工作快報、薪資查詢、職場英語…幫求職者快速http://www.jptpex2013.com.tw/

還有問題?馬上發問,尋求解答。