vb.net打印控件,vb编写打印功能

关于vb.net添加打印控件的用法

txt文件：

我们提供的服务有：做网站、成都网站建设、微信公众号开发、网站优化、网站认证、东乌珠穆沁ssl等。为近1000家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的东乌珠穆沁网站制作公司

procedure TForm1.Button1Click(Sender: TObject);

var

MyFile: TextFile;

SourceFile:TextFile;

Tmp:String;

begin

AssignPrn(MyFile);

AssignFile(SourceFile,'FilePath');

Reset(SourceFile);

Rewrite(MyFile);

Readln(SourceFile,Tmp);

While Not EOF(SourceFile) do

Begin

Writeln(MyFile, Tmp);

Readln(SourceFile,Tmp);

System.CloseFile(MyFile);

end;

图形文件需要TPrinter.canvas来打印了，

vb.net条码打印控件

工具箱，然后随便选择一项，右键 选择项，在.com控件里，microsoft bar ctrol 9.0

VB.NET 打印问题。

先拖过来控件PrintDocument1，然后双击PrintDocument1，在它的PrintPage事件中加入代码如下：

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

dim a as String

a="abcd"

Dim mypen As Pen = New Pen(Color.Blue, 2)

e.Graphics.DrawString(a, New Font("宋体", 20), New Pen(Color.Black, 1).Brush, 30, 30)

End Sub

调用下面语句可直接用默认打印机打印出来：

PrintDocument1.Print()

新闻名称：vb.net打印控件,vb编写打印功能
文章源于：https://www.cdcxhl.com/article26/hcghjg.html

成都网站建设公司_创新互联，为您提供用户体验、域名注册、企业建站、App设计、网站导航、企业网站制作

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联