Конфигурация Android Proguard по умолчанию отключает оптимизацию. Чтобы включить его, в файле project.properties вашего проекта используйте proguard-android-optimize.txt вместо proguard-android.txt
Если вам нужны только символы ANSI, вы можете использовать функцию StrConv () , как это сделано здесь .
Мэтью ответил, как преобразовать в ANSI, но если вы хотите, чтобы результирующий массив байтов по-прежнему представлял исходную строку Unicode, вы должны просто назначить его напрямую:
Public Sub Main()
Dim b() As Byte
Dim s As String
s = "Whatever"
b = s 'Assign Unicode string to bytes.'
s = b 'Works in reverse, too!'
Debug.Print s
End Sub
Вот и все, что нужно Это. В результате получается 16-элементный байтовый массив, каждая последующая пара описывает один символ Unicode.