正文
vb.net串口打印机 vb 串口
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
VB mscomm 控制串口打印机
//Delphi+MSComm控件串口收发程序
//HotPower@126.com
procedure TForm1.FormCreate(Sender: TObject);
begin
if MSComm1.PortOpen then MSComm1.PortOpen := false;//关闭端口
MSComm1.CommPort := 2;//设置端口2
MSComm1.InBufferSize := 256;//设置接收缓冲区为256个字节
MSComm1.OutBufferSize := 256;//设置发送缓冲区为256个字节
MSComm1.Settings := '9600,n,8,1';//9600波特率vb.net串口打印机，无校验vb.net串口打印机，8位数据位，1位停止位
MSComm1.InputLen := 0;//读取缓冲区全部内容(32个字节)
MSComm1.InBufferCount := 0;// 清除接收缓冲区
MSComm1.OutBufferCount:=0;// 清除发送缓冲区
MSComm1.RThreshold := 32;//设置接收32个字节产生OnComm 事件
// MSComm1.InputMode := comInputModeText;//文本方式
MSComm1.InputMode := comInputModeBinary;//二进制方式
MSComm1.PortOpen := true;//打开端口
end;
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if MSComm1.PortOpen then MSComm1.PortOpen := false;;//关闭端口
end;
procedure TForm1.MSComm1Comm(Sender: TObject);
var
buffer: Olevariant;//MSComm1.InputMode = comInputModeBinary
str: string;//MSComm1.InputMode = comInputModeText
i: integer;
begin
case MSComm1.CommEvent of
comEvReceive: //串行接收事件处理
begin
if MSComm1.InputMode = comInputModeText then //字符方式读取
str := MSComm1.Input//读出后会自动清除接收缓冲区,str[1]~str[32]
else //二进制方式读取
buffer := MSComm1.Input;//读出后会自动清除接收缓冲区,buffer[0]~buffer[31]
Edit3.Text := '';
for i := 0 to MSComm1.RThreshold - 1 do //32字节Hex转换
begin
if MSComm1.InputMode = comInputModeText then //单行字符转换
Edit3.Text := Edit3.Text + inttohex(byte(str[i + 1]), 2) + ' '
else //单行二进制数据转换
Edit3.Text := Edit3.Text + inttohex(buffer[i], 2) + ' ';
end;
Memo2.Lines.Add(Edit3.Text);//加入一行显示
end;
end;
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i: integer;
begin
Edit4.Text := '';
for i := 0 to 31 do
begin
MSComm1.Output := char(i);//发送一个字符
Edit4.Text := Edit4.Text + inttohex(i, 2);//以十六进制字符显示
end;
Memo1.Lines.Add(Edit4.Text);//加入一行显示
end;
相关问答
Q1: VB.Net中怎么获取打印机端口名称
打印机端口查看方法如下：
1、进入“控制面板”-“设备和打印机”；
2、右键需要查看的打印机，选择“属性”；
3、选择”Web服务“，即可查看IP端口。
Q2: VS2005如何用VB.NET代码实现打印功能
有个PrintDocument控件,可以实现打印。。。
MSDN原话：
使用 PrintDocument 组件
涉及 PrintDocument 组件的两种主要情况是：
简单的打印作业vb.net串口打印机，如打印单个文本文件。在这种情况下vb.net串口打印机，应将 PrintDocument 组件添加到 Windows 窗体，然后在 PrintPage 事件处理程序中添加打印文件的编程逻辑。 该编程逻辑应以使用 Print 方法打印文档结束。
此方法向打印机发送一个 Graphics 对象，该对象包含在 PrintPageEventArgs 类的 Graphics 属性中。
有关如何使用 PrintDocument 组件打印文本文档的示例，请参见
如何：打印 Windows 窗体中的多页文本文件。
更为复杂的打印作业，如想要重新使用已编写的打印逻辑的情况。
在这种情况下，应从 PrintDocument 组件派生一个新组件，并重写
（请参见 Visual Basic 的 重写或 C# 的 重写） PrintPage 事件。
将 PrintDocument 组件添加到窗体后，它出现在 Windows 窗体设计器底部的栏中
Q3: 高手请解答！vb怎么调用打印机，就是打印那种小票纸和标签的那种小打印机！
1.如果打印机有window驱动vb.net串口打印机，可安装驱动后在VB中直接调用printer来打印vb.net串口打印机，如vb.net串口打印机我们常用vb.net串口打印机的A4纸打印机就可以这样做;
2.如果是没有驱动软件的串口打印机vb.net串口打印机，可在VB中采用串口通讯的方式发送需要打印的内容
vb.net串口打印机的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb 串口、vb.net串口打印机的信息别忘了在本站进行查找喔。
