我知道数组是不能2次定义类型的，并且定义了p(0)就不能在定义p。但是下面这段程序的用法有点特别，请看一下。

dim p(0) as byte
p(0)=*** '***为十进制数，下位机如此设定，可以不用管它
MSComm1.Output = p

在这个程序中，不设为byte类型会不允许传输；将p(0)改成p或p改成p(0)都不能正确通信；我用语句debug.print p 显示是什么也没有，但是下位机接收得到正确信号，说明有数据输出。

我的问题是p到底是什么？它的数据是什么？它是怎么从p(0)转换过来的呢？

P是Byte型数组。它里面每个元素都是0~255之间的数值。

如果：
dim P() as byte
dim b() as byte

我们可以：
p=b

那为什么我用 debug.print p 显示的是什么也没有呢?
byte类型的话至少应该显示一些数据吧,难道就应该什么也不显示的?

你要把p里面的元素转成字符串才能显示出来，否则就是有显示也是乱码。

谢谢版主！我去试试！

我用了cstr命令转换p,然后msgbox输出，结果p(0)是"128"时出来的p是"?"。
这个是什么。。。。

？的ASC码就是128吧，我想是这样的吧
你可以换几个数字试一下哇

"?"就代表不能直接显示的字符。

'你用这段代码就可以直观的看到字符串转成Byte数组后的数据了。
Option Explicit

Private Sub Form_Load()
Dim STR1 As String
Dim Byte1() As Byte
Dim I As Integer

Byte1 = "Joforn 南宫飘雪"
For I = 0 To UBound(Byte1)
Debug.Print "Byte1(" & I & ")=" & Byte1(I)
Next
STR1 = Byte1
Debug.Print STR1
End Sub