请教：如何使用MSCOM控件的软件握手功能（是不是只需设置属性handshaking为comxonxoff就可以了）

[chenpeng1979]

假设需要将文本框中的很多字符串用串口发送出去，是不是只需设置handshaking为comxonxoff就可以了，
其源代码如下：

Private Sub Command1_Click()
Dim slen&, buf1$, i&, t&
buf1 = Trim(Text1.Text)
slen = Len(buf1) ‘取得待发送字符串的长度
For i = 1 To slen ’采用循环发送
Comm1.Output = Mid$(buf1, i, 1)
t = 0
Do ‘发送一个字符延时一段时间
t = t + 1
Loop Until t > 1000000
Next i
End Sub

请高手指教，谢谢了！

[junki]

不用这么麻烦，你整个给它就行了
Comm1.Output = buf1

[knowledge_Is_Life]

接分是王道！