VBA字節數組到字符串

Question

如果此問題以前已得到解答，請致歉，但我無法找到解釋。我在VBScript中創建了一個腳本來加密用戶輸入並匹配已經加密的密碼。我遇到了一些問題，並設法推導出以下內容。

我有一個字節數組（1到2）作爲值（1,16）。我然後定義與陣列值的字符串按如下：

Dim bytArr(1 To 2) As Byte 
Dim output As String 
bytArr(1) = 16 
bytArr(2) = 1 

output = bytArr 
Debug.Print output 

輸出我得到的是d（ETH）ASCII值208.可能有人請解釋字節數組如何轉換爲這個角色？

Answer 1

• 在VBA中，字節數組是特殊的，因爲與其他數據類型的數組不同，其他數據類型的數組是string can be directly assigned to a byte array。在VBA中，字符串是UNICODE字符串，所以當給字節數組分配一個字符串時，它會爲每個字符存儲兩位數;
• 雖然字形似乎是一樣的，看charmap：
  • d是Unicode Character 'LATIN CAPITAL LETTER ETH' (U+00D0)在charmap DOS西方（中央）歐洲字符集所示（0xD1，即十進制209）;
  • Đ在charmap的Windows西方（中歐）字符集顯示Unicode Character 'LATIN CAPITAL LETTER D WITH STROKE' (U+0110)（0xD0，即十進制208）。

獲取上述聲明的計算機架構記endianness（字節順序）保持在一起：英特爾x86處理器使用little-endian的，所以字節數組（0x10，0x01）是一樣的unicode字符串U+0110。

字符是合併通過公然mojibake的情況。爲了證明，請使用Asc and AscW Functions，如下所示：Debug.Print output, Asc(output), AscW(output)帶有不同的控制檯代碼頁，例如：根據chcp 852和chcp 1250。