如何把一个字符串赋值给一个字符数组？

Question

dim txtNum as string
dim write(0 to 20) as byte
如何把txtNum的值赋值给write(20)数组啊？
很简单，但我给忘了，请指点，在线等！谢谢

Answer 1

用动态数组
write是关键字Dim strNum As String
Dim abutWrite() As Byte
abutWrite = StrConv(strNum, vbFromUnicode)
erase abutWrite

Answer 2

写错了，abutWrite应该是abytWrite
前缀a表示数组(array)，byt表示Byte类型

Answer 3

erase abytWrite
这一句是释放动态数组，要放在数组使用完毕后

Answer 4

循环赋值，累死?不过三行代码的事
Byte数组的循环，效率是很高的动态数组费资源码？