2013-02-20 78 views
2

我有字符串:字符串數組到註冊表

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 \波希米亞 互動工作室\武裝突襲2 OA」, 「KEY」,新BYT E(){& H46,& HC9,& H8, & HB6,& HE8,& HF3,& H47,& HCF,& H53,& H2A,& H77,& H2,& HC9,& H19, & H7F },RegistryValueKind.Binary)

它將作爲REG_BINARY類型插入到註冊表中。

回答

0
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