07-10-19, 08:02 PM
اخواني الكرام كيف بقدر اجعل التكست بوكس اثناء التشغيل يكون بحجم الكلمات التي بداخله اي اذا كانت الكلمات طويله يتسع اما لو كانت قصيره يصغر وشكرا لكم
07-10-19, 08:02 PM
10-10-19, 05:51 PM
(07-10-19, 08:02 PM)المنذر كتب : [ -> ]اخواني الكرام كيف بقدر اجعل التكست بوكس اثناء التشغيل يكون بحجم الكلمات التي بداخله اي اذا كانت الكلمات طويله يتسع اما لو كانت قصيره يصغر وشكرا لكم
اخواني الكرام ماحدا رد علي عالسؤال
12-10-19, 09:07 PM
السلام عليكم ورحمة الله وبركاته
اخي الفاضل استخدم الاداة RichTextBox خصائصها افضل
هذا الكود يكبر الاداة نحو الاتجاه العمودي
Private Sub richTextBox1_ContentsResized(ByVal sender As Object, ByVal e As ContentsResizedEventArgs) Handles RichTextBox1.ContentsResized
RichTextBox1.Height = e.NewRectangle.Height + 12
End Sub
اخي الفاضل استخدم الاداة RichTextBox خصائصها افضل
هذا الكود يكبر الاداة نحو الاتجاه العمودي
Private Sub richTextBox1_ContentsResized(ByVal sender As Object, ByVal e As ContentsResizedEventArgs) Handles RichTextBox1.ContentsResized
RichTextBox1.Height = e.NewRectangle.Height + 12
End Sub