资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

vb.net打印多行文本的简单介绍

vb.net Document_PrintPage打印多行文本

比如:

创新互联公司是一家朝气蓬勃的网站建设公司。公司专注于为企业提供信息化建设解决方案。从事网站开发,网站制作,网站设计,网站模板,微信公众号开发,软件开发,微信小程序,10多年建站对成都玻璃钢坐凳等多个行业,拥有丰富建站经验。

Private Sub Document_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs)

e.Graphics.DrawString(str0, New Font("Arial", 14, FontStyle.Regular), Brushes.Black, 50, 50)

e.Graphics.DrawString(A1, New Font("Arial", 10, FontStyle.Regular), Brushes.Black,50, 100)

e.Graphics.DrawString(A2, New Font("Arial", 10, FontStyle.Regular), Brushes.Black, 300,100)

e.Graphics.DrawString(A3, New Font("Arial", 10, FontStyle.Regular), Brushes.Black, 800,100)

也就是分次用不同坐标和不同的字体来打印各变量。画线用:

e.Graphics.DrawLine(BlackPen, x1, y1, x2, y2)。

具体坐标数值自己用尺量出,再换算。

VB.NET多个文本框显示多行数据

Dim mycon As New SqlConnection(connstrs)

Dim sqlStr As String = "SELECT * FROM [Column] FROM [Table]"

Dim cmd As New SqlCommand(sqlStr, mycon)

Dim reader = cmd.ExecuteReader()

Dim i As Integer = 1

While reader.Read()

Dim txt As New TextBox()

txt.Name = "txt" + i

txt.Size = New Size(100, 20) '文本框大小

txt.Location = New Point(50, i * 20 + 20)'left:50 top:随便写的,自己看着调

txt.Text = reader.GetValue(0).ToString()

Me.Controls.Add(txt) 'Me 可以改为你要添加上去的对象

End While

'未经过运行,自己调试看看能否OK

vb中怎么让picturebox输出多行文字

想要让picturebox输出多行文字,可以反复使用Print方法在PictureBox控件中输出多行文字,在插入的文字中输入回车符(即Chr(13))即可,每一个Print语句右面是一行的内容。

此外,在需要换行的地方加上“ vbCrlf ”代码也是可以实现让picturebox输出多行文字的。

扩展资料

PictureBox 控件和 Data 控件是唯一可以放置在 MDI窗体内部区域的标准 Visual Basic 控件。可以使用该控件在内部区域的顶部或底部对控件分组,以创建工具栏或状态栏。

注意 Unisys Corporation 有一项专利,该专利声称涉及到 GIF-LZW压缩技术的某些方面,在该技术中使用了 PictureBox 和 Image 控件。Microsoft Corporation 于1996年9月获得了对 Unisys LZW 专利的使用许可。

然而,Microsoft 的许可证并不延伸到那些软件开发商或第三方,他们使用任何 Microsoft 工具包、语言开发或操作系统产品来在他们自己的产品中提供 GIF 读/写和/或任何其他 LZW 能力(例如,通过 DLL 和 API)。

参考资料来源:

百度百科-PictureBox控件

百度百科-Visual Basic


网站名称:vb.net打印多行文本的简单介绍
文章源于:http://cdkjz.cn/article/dsegehe.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

业务热线:400-028-6601 / 大客户专线   成都:13518219792   座机:028-86922220