包含MSCOMM32.OCX 的库文件是哪个? 本人在pb中引用vb中的MSCOMM32.OCX 控件,为何必须装上vb才能引用? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Controls→OLE→Insert Control→Microsoft Communications Control,加入后点击其OLE Control Properties,可以设置它的基本属性如通讯端口(C)、设置参数 (S) 等,当然也可以在程序中设置。以下是一段脚本例子: String ls_data ole_1.object.CommPort = 1 //使用COM1端口 ole_1.object.Settings = ″9600,N,8,1″ //设置或返回串行端的波特率、奇偶校验位、 数据位数、停止位 ole_1.object.InputLen = 0 //初始化Input ole_1.object.PortOpen = True //打开端口 ole_1.Object.Output = ″h″ //向COM口发送字符 Do Yield() //等待数据 LOOP Until ole_1.Object.InBufferCount >=1 ls_Output = ole_1.Object.Input //取数据 ole_1.object.PortOpen = FALSE //关闭端口SHANNON ---------------- [email protected] 进就加分!! 如何禁止拖动窗体的边框?? SQL 语句的问题 怎样把MSFLEXGRID中的数据读取到数据库中? 用VB6做的报表(*.Drs),如何以在编译时不将它编译到.EXE里去? 请问如何改变鼠标的显示形状 有关TreeView的问题,急! 不知什么原因,asp网页采集提示下标越界 一个关于VB不能加载控件的问题,请大家帮一下忙 有两个Access表: a , b, a表有20条记录,b表有10条记录,我想把b表的记录加入a表,a表就有了30条记录,用SQL语句怎么实现? 关于声明DLL问题 请教一些健值
String ls_data
ole_1.object.CommPort = 1 //使用COM1端口
ole_1.object.Settings = ″9600,N,8,1″ //设置或返回串行端的波特率、奇偶校验位、 数据位数、停止位
ole_1.object.InputLen = 0 //初始化Input
ole_1.object.PortOpen = True //打开端口
ole_1.Object.Output = ″h″ //向COM口发送字符
Do
Yield() //等待数据
LOOP Until ole_1.Object.InBufferCount >=1
ls_Output = ole_1.Object.Input //取数据
ole_1.object.PortOpen = FALSE //关闭端口
SHANNON
----------------
[email protected]