首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

打印机统制(跪求)

2012-12-17 
打印机控制(跪求)用以下代码给打印机发送数据后,怎么检测成功发送了多少数据????打开打印机lReturn Ope

打印机控制(跪求)
用以下代码给打印机发送数据后,怎么检测成功发送了多少数据???? 
  '打开打印机 
  lReturn = OpenPrinter(Printer.DeviceName, lhPrinter, 0) 
  '设置文档 
  MyDocInfo.pDocName = frmMain.Caption 
  MyDocInfo.pOutputFile = vbNullString 
  MyDocInfo.pDatatype = "RAW" 
  lDoc = StartDocPrinter(lhPrinter, 1, MyDocInfo) 
  '启动线程 
  Call StartPagePrinter(lhPrinter) 
  '写入数据 
  lReturn = WritePrinter(lhPrinter, pByte, 1, lpcWritten) 
  '结束打印 
  lReturn = EndPagePrinter(lhPrinter) 
  lReturn = EndDocPrinter(lhPrinter) 
  lReturn = ClosePrinter(lhPrinter) 

请高手指教一下VB用什么函数实现检测成功发多少送数据
[解决办法]
关注

热点排行