Skip to main content

AccessTr.neT


Vb.Net ile RichTextBox içerisindeki verileri yazdırma

Vb.Net ile RichTextBox içerisindeki verileri yazdırma

#7
(13/05/2013, 12:11)tefenninet yazdı: ekde örnek olarak bir uygulama ekledim yazdırıyorum ama tek satırda çıkıyor yazıcı ekranı Img-cray


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
RichTextBox1.Select(RichTextBox1.TextLength, 0)
RichTextBox1.AppendText("Rent A Car Şartları:Bir taraftan bu şartnamenin 1.sayfasında tanımlanan" & vbLf)

RichTextBox1.Select(RichTextBox1.TextLength, 1)
RichTextBox1.AppendText("aracı, kira ücreti karşılığında kullanmak üzere teslim alan KİRACI ile, diğer" & vbLf)

RichTextBox1.Select(RichTextBox1.TextLength, 2)
RichTextBox1.AppendText("taraftan bu aracı kiraya veren KİRALAYAN, araç kiralaması ile ilgili olarak" & vbLf)

RichTextBox1.Select(RichTextBox1.TextLength, 3)
RichTextBox1.AppendText("aşağıda açıklanan koşullarda anlaşmaya varmışlardır. 1-Kira dönemi - kira" & vbLf)

RichTextBox1.Select(RichTextBox1.TextLength, 4)
RichTextBox1.AppendText("süresi ve araç teslimi;Araç, KİRALAYAN tarafından KİRACI ya, tüm lastikleri," & vbLf)

RichTextBox1.Select(RichTextBox1.TextLength, 5)
RichTextBox1.AppendText("araca ait belgeleri,aksesuar ve teçhizatı ile birlikte, periyodik bakımları" & vbLf)

RichTextBox1.Select(RichTextBox1.TextLength, 6)
RichTextBox1.AppendText("yapılmış olarak teslim edilmiştir. KİRACI,söz konusu aracı, hem mekanik hem de" & vbLf)

RichTextBox1.Select(RichTextBox1.TextLength, 7)
RichTextBox1.AppendText("kaporta açısından sağlam ve iyi durumda teslim aldığını, araçta hiçbir hasar ya da" & vbLf)


End Sub

Buna benzer bişey olabilir
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#8
merhaba
tek satır değilde satır sonunda alt satıra nasıl geçireceğiz.
Cevapla
#9
(18/10/2014, 17:54)CELİKOGLU1 yazdı: merhaba
tek satır değilde satır sonunda alt satıra nasıl geçireceğiz.


RichTextBox1.SelectedText = "Birinci satır," & vbCrLf
RichTextBox1.SelectedText = "İkinci Satır," & vbCrLf
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task