VB可用MsComm控件读取来自USB转RS232接口的数据。或者使用Winsock 控件接收来自USB网卡的数据。
MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。
利用 WinSock 控件可以与远程计算机建立连接,并通过用户数据文报协议 (UDP)或者传输控制协议
(TCP)进行数据交换。这两种协议都可以用来创建客户与服务器应用程序。
例如桌面有个txt文件(路径是:C:\Documents and Settings\Administrator\桌面\新建 文本文档txt)
窗体代码:
Dim TXT As StringPrivate Sub Form_Activate()
Print TXT '显示在form1上
End Sub
Private Sub Form_Load()
Dim Strr As String
Open "C:\Documents and Settings\Administrator\桌面\新建 文本文档txt" For Input As #1 '打开桌面的一个新建txt文件
Do While Not EOF(1) '逐行读取,知道结尾
Line Input #1, Strr
If TXT <> "" Then
TXT = TXT & Chr(10) & Strr
Else
TXT = TXT & Strr
End If
Loop
Close #1
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)