19554.html
来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 27 行
HTML
27 行
<html> <head> <title>Re: 请高手指导如何抓 MsComm 资料</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>Re: 请高手指导如何抓 MsComm 资料</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:wenglwh@hotmail.com">假会</a> on October 02, 1999 at 09:51:16:<p>In Reply to: <a href="19524.html">请高手指导如何抓 MsComm 资料</a> posted by 搞不懂 on October 01, 1999 at 10:34:51:<p>: 周边设备 burd 2400,N,8,1 传送为 ASC 文字<br>: 请问要如何用 vb 抓下来存放于档案内<p>: 3Q<p>Sub From_Load()<br> Dim Instring As String<br> MSComm1.CommPort = 2<br> MSComm1.Settings = "9600,N,8,1"<br> MSComm1.InBufferCount = 0<br> MSComm1.InputLen = 0<br> <br> Do<br> DoEvents<br> Instring = MSComm1.Input<br> MsgBox Instring<br> Loop Until MSComm1.Input = Chr(27)<br> <br>End Sub<p>懂了吧 !<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 19554--><!--top: 6--><li><a href="6.html">Re: 还能再快吗?</a> <b>jason_kang</b> <i>12:47:43 10/11/99</i>(<!--responses: 6-->0)<ul><!--insert: 6--></ul><!--end: 6--></ul><!--end: 19554--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?