vb.net Document_PrintPage打印多行文本

比如：

創新互聯建站堅持“要么做到，要么別承諾”的工作理念，服務領域包括：成都網站設計、網站建設、企業官網、英文網站、手機端網站、網站推廣等服務，滿足客戶于互聯網時代的長泰網站設計、移動媒體設計的需求，幫助企業找到有效的互聯網解決方案。努力成為您成熟可靠的網絡建設合作伙伴！

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 打印功能

可以把數據導出到EXCEL，然后使用EXCEL進一步處理后使用。

也可以做成vb報表(VB自帶有)。

先設置報表格式，打印時向報表傳遞數據就可以了。

怎么用VB.NET編程實現在桌面隨機坐標顯示指定的某些圖片（隨機顯示某張圖片），望高手幫忙

1.首先建立一個基于Microsoft?.NET?Framework?2.0以上的VB.NET解決方案。

2.在窗體上面添加一個PictureBox控件，并綁定到父容器里面（綁定到父容器的操作可以不去實現）。

3.給PictureBox.Image指定路徑，這里以“C:\Windows\Web\Wallpaper\Windows\img0.jpg”為例子，當然這張圖片在Windows?7旗艦版下面會有的。

4.添加代碼：

Public?Class?Form1

Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?Handles?MyBase.Load

Randomize()

Dim?xScn?As?UInteger?=?My.Computer.Screen.Bounds.Width

Dim?yScn?As?UInteger?=?My.Computer.Screen.Bounds.Height

ReLine:

Dim?xShow?As?Integer?=?Int((xScn?+?1)?*?Rnd())?-?Me.Width

Dim?yShow?As?Integer?=?Int((yScn?+?1)?*?Rnd())?-?Me.Height

Me.FormBorderStyle?=?Windows.Forms.FormBorderStyle.None

PictureBox1.Image?=?Image.FromFile("C:\Windows\Web\Wallpaper\Windows\img0.jpg")

PictureBox1.SizeMode?=?PictureBoxSizeMode.StretchImage

If?xShow?=?0?And?yShow?=?0?Then

Me.Location?=?New?Point(xShow,?yShow)

Else

GoTo?ReLine

End?If

Me.Show()

End?Sub

End?Class

5.我是使用?Visual?Studio?2012?Ultimate?開發的，若有錯誤請參考請他方法進行修改

vb.net怎么自定義坐標系

scale(x1,y1)-(x2,y2)

你只要記住，這里的x1,y1是左上角的坐標，x2,y2是右下角的坐標，通過這兩個點的坐標設定，就可以決定坐標原點的位置以及坐標軸的方向了，比如

Scale (-300,200)-(300,-200)

以上是把坐標原點設在窗體中心，x軸長600，方向從左到右，y軸長400，方向從下向上。

Scale (800,0)-(0,600)

以上是把坐標原點設在窗體右上角，x軸長800，方向從右到左，y軸長600，方向從上向下。

下面說坐標軸和原點的標示法：

假定自定義坐標設為：

Scale (-300, 200)-(300, -200)

則

Line (-300, 0)-(300, 0) '畫x軸

Line (0, 200)-(0, -200) '畫y軸

CurrentX = 290

CurrentY = -5

Print "x" '標示x軸

CurrentX = 5

CurrentY = 200

Print "y" '標示y軸

CurrentX = 5

CurrentY = -5

Print "0" '標示原點

vb的printer.scale 用來打印全屏或者當前控件顯示內容，換成vb.net用什么方法能實現？

報表打印應該也能實現，但是我覺得你這個用文本打印更簡單，將數據輸出到txt文件，結果用RichTextBox顯示，但是需要簡單的排版，調用打印機打印RichTextBox即可的

排版用tab（）、space（）、vbcrlf或PrintLine(1)換行，代碼類似如下樣式

PrintLine(1, TAB(60), "準考證" )

PrintLine(1)

PrintLine(1, "姓名:" xingming Space(3) "準考證號：" cel(1) Space(3) cel(2) Space(3) cel(3))

但是TAB()排版比較規整

分享題目：關于vb.net按坐標打印的信息
分享網址：http://vcdvsql.cn/article22/dsigejc.html

成都網站建設公司_創新互聯，為您提供網頁設計公司、微信小程序、響應式網站、網站排名、品牌網站制作、用戶體驗

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯