<< 向前        下一页 >>

ID : 373

Comm.Input

功能

通过数据通信功能接收数据。

格式

Comm.Input(线路编号[, 超时[, 输入字节数]])

指定项目

线路编号
通过整数型指定线路编号
超时
使用整数型数据指定超时时间。可省略。省略时通过默认值(参数指定值)等待。
输入字节数量
使用整数型数据指定线路的数据类型为“二进制”时接收的数据字节数。省略时为1。

返回值

返回接收的数据。

解说

  • 接收来自指定线路的数据。
  • 文本模式时,返回除通信用标题和间隔符(文本的分隔符)以外的文本部分。
  • 超时的指定值和含义如下所示。超时时发生错误等级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

<< 向前        下一页 >>