ID : 373
Comm.Input
功能
通过数据通信功能接收数据。
格式
Comm.Input(线路编号[, 超时[, 输入字节数]])
指定项目
- 线路编号
- 通过整数型指定线路编号。
- 超时
- 使用整数型数据指定超时时间。可省略。省略时通过默认值(参数指定值)等待。
- 输入字节数量
- 使用整数型数据指定线路的数据类型为“二进制”时接收的数据字节数。省略时为1。
返回值
返回接收的数据。
解说
指定值 | 含义 |
---|---|
>= 0 | 等待指定的时间。(单位 ms) |
= -1 | 无限等待。 |
< -1、省略时 | 通过默认值(参数指定值)等待。 |
注意事项
线路的数据类型为“文本”时,即使在输入字节数中指定值,也忽略。
应用示例
'!TITLE“使用数据通信功能接收数据”
'使用线路编号1接收数据
Sub Sample_CommInput
Dim aaa As Variant
Dim bbb As Integer
Dim ccc As Integer
'打开线路编号1
Comm.Open 1
'通过线路编号1将超时时间设为10秒,接收10字节数据,代入aaa中
aaa = Comm.Input( 1, 10000, 10 )
'在bbb中代入aaa要素的最大索引编号
bbb = UBound( aaa )
'重复处理直至ccc变为bbb
For ccc = 0 To bbb
'在I变量中代入接收的数据
I[ccc] = aaa( ccc )
Next
'关闭线路编号1
Comm.Close 1
End Sub
ID : 373