[haider kh]

السلام عليكم ورحمة الله وبركاته 
اخوتي الاساتذة الكرام 
كما في العنوان سؤالي هو
كيفية تصغيرحجم الخط ليناسب حجم التكست بوكس عن طريق الكود
بحيث يتغيير حجم النص ليتلائم مع حجم التكستبوكس 
مع الشكر الجزيل

[القط الاسود]

بسيط جداً




او يمكنك استعمال الكولد:

كود :

Imports System.Drawing

Public Class Form1

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'
       TextBox1.Font = New Drawing.Font("Comic Sans MS", 18, FontStyle.Bold)
   End Sub
End Class

[haider kh]

(28-06-20, 05:42 PM)القط الاسود كتب : بسيط جداً





او يمكنك استعمال الكولد:

كود :

Imports System.Drawing

Public Class Form1

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'
       TextBox1.Font = New Drawing.Font("Comic Sans MS", 18, FontStyle.Bold)
   End Sub
شكرا اخي الكريم اردت عن طريق الكود
اثناء التصميم بسيطة جدا كما تفضلت
[hr]
[quote='القط الاسود' pid='163453' dateline='1593351747']
بسيط جداً

[img]https://i.ibb.co/VTx9bzh/fix.png[/img]


او يمكنك استعمال الكولد:

[code]Imports System.Drawing

Public Class Form1

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'
       TextBox1.Font = New Drawing.Font("Comic Sans MS", 18, FontStyle.Bold)
   End Sub
End Class

الكود لا يعمل على فيجوال بيسك ٦

[Ahmed_Mansoor]

وعليك السلام ورحمة الله وبركاته

أهلا بك أخي الكريم , هذا مثال على ذلك , بالتوفيق .

[haider kh]

(03-07-20, 11:25 AM)Ahmed_Mansoor كتب : وعليك السلام ورحمة الله وبركاته

أهلا بك أخي الكريم , هذا مثال على ذلك , بالتوفيق .

السلام عليكم استاذنا الفاضل
Ahmed_Mansoor

للاسف ليس هو المطلوب
ما ابحث عنه كما في الصورة المرفقة وعند عرض النص  او عند الكتابة في التكست بوكس اثناء تنفيذ البرنامج

[Ahmed_Mansoor]

وعليك السلام ورحمة الله وبركاته

أهلا بك أخي الكريم , هذا مثال آخر , بالتوفيق .

[haider kh]

(04-07-20, 07:43 AM)Ahmed_Mansoor كتب : وعليك السلام ورحمة الله وبركاته

أهلا بك أخي الكريم , هذا مثال آخر , بالتوفيق .

شكرا جزيلا استاذ
Ahmed_Mansoor

نعم هذا هو المطلوب بارك الله بك
دمت موفقا . حفظك الله