28-06-20, 02:53 PM (آخر تعديل لهذه المشاركة : 29-06-20, 09:18 AM {2} بواسطة haider kh.)
السلام عليكم ورحمة الله وبركاته
اخوتي الاساتذة الكرام
كما في العنوان سؤالي هو
كيفية تصغيرحجم الخط ليناسب حجم التكست بوكس عن طريق الكود
بحيث يتغيير حجم النص ليتلائم مع حجم التكستبوكس
مع الشكر الجزيل
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
28-06-20, 06:07 PM (آخر تعديل لهذه المشاركة : 28-06-20, 06:11 PM {2} بواسطة 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