مشکل با RichtextBox

[daniyal_1363]

سلام

چه طوری میشه از طریق کد نویسی داخل RichtextBox متن وارد کرد بدون اینکه متن های قبلی پاک بشه و همه ی خط های نوشته شده راست چین بشه ؟

مثلاً اینطوری :




سوله چیست؟
به سازه های فلزی شیب دار که براساس محاسبات فنی خاص تولید می شود، سوله گویند.
سازه های شیب دار یا سوله در لاتین با عنوان Gable Bents یا Ridge Bents نامیده و معرفی می شوند.
از این قاب ها در پوشش دهانه های بزرگ و در ساختمان های صنعتی و کشاورزی مانند کارخانه ها، انبارها، مرغ داری ها، آشیانه های هواپیما، سالن های ورزشی، تعمیرگاه ها، پارکینگ ها، دامداری ها، فروشگاه ها و موارد متعدد دیگر استفاده می شود




خط هایی که سبز شده از طریق کد نویسی وارد شده و راست چین بشه (یعنی با زدن یک کلید بهRichtextbox ما اضافه بشه و خودش راست چین بشه )

[daniyal_1363]

سلام مجدد

خوب، خودم راهش رو پیدا کردم :لبخند:

این برای اضافه کردن نوشته به انتهای RichTextbox بدون اینکه نوشته های قبلی پاک بشن



RichTextbox.Text = RichTextbox.Text + vbCrLf + "نوشته مورد نظر "





اینم برای راست چین کردن همه نوشته




RichTextbox.SelStart = 0
RichTextbox.SelLength = Len(RichTextbox.TextRTF)
RichTextbox.SelAlignment = 1
SendKeys ("{home}")




Sendkeys هم برای اینکه نوشته از حالت انتخاب خارج بشه :چشمک: