1785.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 25 行

HTML
25
字号
<html>  <head>    <title>利用 Comm 收发串列资料 !!</title>  </head>  <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">    <center>      <h1>利用 Comm 收发串列资料 !!</h1>    </center><HR><p>Posted by <a href="mailto:cyber@ms1.hinet.net">ERIC</a> on January 23, 1998 at 10:59:53:<p>请问如何利用 mscomm来收发串列资料呢??<p>我写了一个测试程试为何总收到 " ? " or 中文乱码呢 ??<p>以下是程式内容 ......<p> <br>Private Sub Command1_Click()<br>aa:<br> MSComm1.PortOpen = True<br> <br>   <br>      Do<br>        <br>        DoEvents<br>    <br>    Loop Until MSComm1.InBufferCount >= 2<br>    <br>    a = MSComm1.Input<br>    Print a<br>    <br>     MSComm1.PortOpen = False<br>     <br>     GoTo aa<br>     <br>End Sub<p>Private Sub Form_Load()<br>    <br>    MSComm1.CommPort = 3<br> <br>    MSComm1.Settings = "2400,N,8,1"<br>  <br>    MSComm1.InputLen = 0<br>    <br>    MSComm1.InputMode = comInputModeBinary<br>    <p>    <br>End Sub<p><br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 1785--><!--top: 1813--><li><a href="1813.html"><b>使用 byte array</b></a> 小吴 <i>06:36:12 2/01/98</i>(<!--responses: 1813-->0)<ul><!--insert: 1813--></ul><!--end: 1813--></ul><!--end: 1785--><br><HR><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?