7154.html
来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 42 行
HTML
42 行
<html>
<head>
<title>请教VB 通讯接收技巧</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>请教VB 通讯接收技巧</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto:604284@taian-electric.com.tw">Heng</a> on November 06, 1998 at 12:09:30:<p>
Private Sub Command1_Click()<br> Dim Buffer As Variant<br> Dim Arr1() As Byte<br> <br> MSComm1.InputMode = comInputModeBinary<br> <br> Dim byteData(4) As Byte<br> byteData(0) = &H55<br> byteData(1) = &H1<br> byteData(2) = &H1<br> byteData(3) = &HFE<br> byteData(4) = &HAA<br> <br> MSComm1.Output = byteData '送出时正常 . OK.<br> '================================================ <br> Do Until MSComm1.InBufferCount < 5<br> DoEvents<br> Loop<br> <br> Buffer = MSComm1.Input<br> Arr1 = Buffer<br> Text2.Text = Arr1 '问题点:接收时无法收到正常值......??????<br> '请问程式该如何撰写 ...Thank's.........#<br> '===============================================<br> End Sub<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 7154-->
<!--top: 7156--><li><a href="7156.html">Re: 请教VB 通讯接收技巧</a> <b>callback</b> <i>13:50:00 11/06/98</i>
(<!--responses: 7156-->3)
<ul><!--insert: 7156-->
<!--top: 7586--><li><a href="7586.html">Re: 请教VB 通讯接收技巧--利用于传真如何??</a> <b>Gary Chen</b> <i>13:23:45 11/24/98</i>
(<!--responses: 7586-->1)
<ul><!--insert: 7586-->
<!--top: 7753--><li><a href="7753.html">Re: 我想要将c:\123\test.txt 利用这个控制项来做传真</a> <b>CHARYANG</b> <i>02:46:24 11/28/98</i>
(<!--responses: 7753-->0)
<ul><!--insert: 7753-->
</ul><!--end: 7753-->
</ul><!--end: 7586-->
<!--top: 7157--><li><a href="7157.html">Re: 补充</a> <b>callback</b> <i>13:58:27 11/06/98</i>
(<!--responses: 7157-->0)
<ul><!--insert: 7157-->
</ul><!--end: 7157-->
</ul><!--end: 7156-->
<!--top: 7155--><li><a href="7155.html">Re: 请教VB 通讯接收技巧</a> <b>callback</b> <i>13:30:39 11/06/98</i>
(<!--responses: 7155-->0)
<ul><!--insert: 7155-->
</ul><!--end: 7155-->
</ul><!--end: 7154-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?