vb byte()型数组的使用

发布网友发布时间：2022-09-21 12:30

共3个回答

热心网友时间：2023-11-18 04:01

VB 6.0

dim r() as byte
r="10001000"

UBound(r) = 15
r(0) = 49
因为VB中 "10001000" 的每一个字符在r里占用两个byte，
所以r被定义位 (0 To 15)
"10001000" 中第一个 1，占用的是 r(0)，r(1)
"1" 的ASCII码是 49

热心网友时间：2023-11-18 04:02

ubound(r) 是16
r（0）是你的第一位“1”的值，传值过程是asc码

热心网友时间：2023-11-18 04:02

这个语句表示把输入的字符串放到数组中，每个字符占两字节，所以数组的上限就是字符串长度*2-1，在这里是8*2-1＝15。
至于为什么r(0)是49，那是因为你定义的是字节型，因此只把相应字符的ASC码存入，又因为ASC码只占一字节，因此另一字节就为0。整个赋值的结果是：
49 0 48 0 48 0 48 0 49 0 48 0 48 0 48 0