串口发送8位字节数据问题，请帮帮我！！！

Question

这样发送有什么问题？？
   fs1(0) = ＆H0
   MSC.Output = fs1
   My_Delay (500)
   
   fs2(0) = &H0
   MSC.Output = fs2
   My_Delay (500)
   
   fs3(0) = &H0
   MSC.Output = fs3
   My_Delay (500)
   
   fs4(0) = &H0
   MSC.Output = fs4
   My_Delay (500)
   
   fs5(0) = &H12
   MSC.Output = fs5
   My_Delay (500)
   
   fs6(0) = &H15
   MSC.Output = fs6
   My_Delay (50)
   
   fs7(0) = &H1
   MSC.Output = fs7
   My_Delay (500)
   
   fs8(0) = &H18
   MSC.Output = fs8
   My_Delay (1000)

Answer 1

就是为什么一个字节一个字节发呀，这样会每次只会发一个字节不会8个一起发的.
fs1(0) = ＆H0
fs1(1) = ＆H0
fs1(2) = ＆H0
fs1(3) = ＆H0
fs1(4) = ＆H0
fs1(5) = ＆H0
fs1(6) = ＆H0
fs1(7) = ＆H0
MSC.Output = fs1
这样还能少写几句呢！！

Answer 2

晕
dim i as integer
for i = to 7
    mscomm.output=fs1(i)
    my_delay(500)
next i 
不过你每个数据发送完延时不同这样写就不大好了，得再改改

Answer 3

for i=0 to 7
不好意思我觉得这样发送没问题