dim l1 as byte
dim l2 as byte
dim st1 as string
dim re1(0 to 1) as byte
st1="26,27"
re1(0)=HEX(val(mid(st1,1,2)))
re1(1)=HEX(val(mid(st1,4,2)))

最后两个语句提示类型错误，请教各位，问题出在哪？

[此贴子已经被作者于2019-4-5 08:00编辑过]

谢谢！