Question

我有字符串：

46-C9-08-B6-E8-F3-47-CF-53-2A-77-02-C9-19-7F

我想把它变成一个数组，所以它看起来像这样：

{&H46, &HC9, &H8, &HB6, &HE8, &HF3, &H47, &HCF, &H53, &H2A, &H77, &H2, &HC9, &H19, &H7F}

完成的行将如此：

My.Computer.Registry.SetValue（“HKEY_LOCAL_MACHINE \ SOFTWARE \ Wow6432Node \波希米亚 Interactive Studio \ ArmA 2 OA“，”KEY“，New Byte（）{＆amp; H46，＆amp; HC9，＆amp; H8，＆amp; HB6，＆amp; HE8，＆amp; HF3，＆amp; H47，＆amp; HCF，＆amp; H53，＆amp; H2A，＆amp; H77，＆amp; H2，＆amp; HC9，＆amp; H19，＆amp; H7F}，RegistryValueKind.Binary）

它将作为REG_BINARY类型插入注册表。

Answer 1

Dim s As String= "46-C9-08-B6-E8-F3-47-CF-53-2A-77-02-C9-19-7F"
Dim parts As String() = s.Split(New Char() {"-"})        
Dim byteArray(parts.Length - 1) As Byte

For i As Integer = 0 To parts.Length - 1
    byteArray(i) = Convert.ToByte(parts(i), 16)
Next

String to Array to Registry

1 个答案: