簡體   English   中英

如何在vb.net中將十六進制轉換為char

[英]How to convert hex to char in vb.net

我可以從字節轉換為十六進制,但是從十六進制轉換為char時遇到問題。

下面是我從字節轉換為十六進制的代碼:

 Dim RXByte As Byte
    Do
        RXCnt = 0
        Do
            RXByte = COMPort.ReadByte
            RXArray(RXCnt) = LookUpTable(RXByte >> 4) 
            RXCnt = RXCnt + 1
            RXArray(RXCnt) = LookUpTable(RXByte And 15)
            RXCnt = RXCnt + 1
            RXArray(RXCnt) = " "
            RXCnt = RXCnt + 1
            SpaceCount = (SpaceCount + 1) And 31     
            If SpaceCount = 0 Then                    
                RXArray(RXCnt) = Chr(13) ' CR
                RXCnt = RXCnt + 1
                RXArray(RXCnt) = Chr(10) ' LF
                RXCnt = RXCnt + 1
            Else
                If (SpaceCount And 3) = 0 Then       
                    RXArray(RXCnt) = " "
                    RXCnt = RXCnt + 1
                    RXArray(RXCnt) = " "
                    RXCnt = RXCnt + 1
                End If
            End If
        Loop Until (COMPort.BytesToRead = 0)
        '----- End of communication protocol handling -------------------------------------------------------------
        Me.Invoke(New MethodInvoker(AddressOf Display)) 
    Loop Until (COMPort.BytesToRead = 0) 

您不需要查找表。 只需使用內置函數將字節轉換為字符串即可。

    b = 245
    s = b.ToString("X")

相反有一些功能。

    s = "F4"
    b = Convert.ToByte(s, 16)

我還建議您使用字符串生成器,而不要使用數組。

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM