چاپ متن در TextBox

tahasherwani

New Member
سلام دوستان من با VisualBasic 2008 کار میکنم

وقتی میخوام محتوای متنی TextBox رو که‌ (Right to Left ) هستش چاپ کنم رو صفحه‌ کاغذ (Left to Right) میشه‌ لطفا یکی کمکم کنه‌ ؟


My TextBox1.Text Properties

Right to Left : Yes
Text Align : Right


کد:
Imports System.Drawing.Printing
-----------------------------------------------
Public Class DataForm
 

   Private Sub printText(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
       ev.Graphics.DrawString(TextBox1.Text, New Font("Arial", 12, FontStyle.Regular), Brushes.Black, 120, 120)
       ev.HasMorePages = False
   End Sub
.
.
.
.
.

Private Sub BTNPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNPrint.Click
       Try
           Dim prindoc As New PrintDocument
           AddHandler prindoc.PrintPage, AddressOf Me.printText
           prindoc.Print()
       Catch ex As Exception
           MessageBox.Show("Error", ex.ToString())
       End Try
   End Sub
 

جدیدترین ارسال ها

بالا