使用HEX的VB.net XOR操作

时间:2013-05-02 08:23:12

标签: vb.net hex

我想使用Visual Basic 2012为以下字符串计算十六进制的BCC XOR:H使用以下规则输入* in hex(48 0D 2A):
Step 1. BCCXOR = 00h BCCXOR = 00
Step 2. BCCXOR = BCCXOR xor 48 BCCXOR xor第一个字符 - 结果BCCXOR = 48h
Step 3. BCCXOR = BCCXOR xor 0D BCCXOR xor第二个字符 - 结果BCCXOR = 44h
Step 4. BCCXOR = BCCXOR xor 2A BCCXOR xor第三个字符 - 结果BCCXOR = 6Fh

我的代码是:

    Dim BCCXOR As Integer = &H0
    For i As Integer = 0 To TextBox1.TextLength - 1
        BCCXOR = (BCCXOR) Xor Conversion.Hex(Strings.Asc(TextBox1.Text.Substring(i, i + 1).ToString()))
    Next
    BCCXOR = BCCXOR Xor Hex(&HD)
    BCCXOR = BCCXOR Xor Hex(&H2A)
    TextBox2.Text = BCCXOR

我的问题是,当我尝试计算BCCXOR xor 0D时收到错误消息我收到如下错误:
从字符串“D”到“Long”类型的转换无效。

1 个答案:

答案 0 :(得分:0)

Hex函数将数字转换为字符串。我不认为这是你想要的。只需删除fonction调用就可以了。

BCCXOR = BCCXOR Xor &HD
BCCXOR = BCCXOR Xor &H2A