منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كود تغيير حجم النص في التكست بوكس
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

بسم الله 

اريد كود تغيير حجم النص

في التكست بوكس

طبعنا ابغا احدد في الكود كم ابغى حجم النص


وشكرا
عندي ان شاء الله Big Grin Big Grin Big Grin
تفضل الكود مع خاصية تغير نمط النص ان كنت تريدها

كود :
Imports System.Drawing.Font

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      Me.TextBox1.Font = New Font("Times New Roman", 22)
    End Sub
End Class

او اتركها فارغة عل هذا الشكل :

كود :
Me.TextBox1.Font = New Font("", 16)
(12-10-14, 04:16 PM)hitman48 كتب : [ -> ]عندي ان شاء الله  Big Grin   Big Grin   Big Grin
تفضل الكود مع خاصية تغير نمط النص ان كنت تريدها  


كود :
Imports System.Drawing.Font

Public Class Form1

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
     Me.TextBox1.Font = New Font("Times New Roman", 22)
   End Sub
End Class

او اتركها فارغة عل هذا الشكل :


كود :
Me.TextBox1.Font = New Font("", 16)

الله يعطيك العافيه
تسلم اخي ....مشكور
صح كود اخونا  hitman48  صحيح

كود :
TextBox1.Font = New Font("arial", 14)


وبارك الله فيك
PHP كود :
Me.TextBox1.Font = New Font("Tahoma"12FontStyle.Bold

يوجد أيضا خاصية الـ FontStyle وهي عن شكل الخط :

كود :
FontStyle.Bold  ( خط عريض )

FontStyle.Italic ( خط مائل )

FontStyle.Regular ( خط عادي )

FontStyle.Strikeout ( خط منتصف الكلمة )

FontStyle.Underline ( خط تحت الكلمة )
أريد طريقة تغيير الخط عن طريق الكومبو بوكس بالعلم أن جميع الخطوط موجودة في الكومبو
أرجو الرد
(29-04-20, 04:01 AM)أمجد وضاح كتب : [ -> ]أريد طريقة تغيير الخط عن طريق الكومبو بوكس بالعلم أن جميع الخطوط موجودة في الكومبو
أرجو الرد

نفس الكود مع تعديل بسيط

كود :
Me.TextBox1.Font = New Font(ComboBox1.SelectedItem.ToString, 14, FontStyle.Bold)

و طبعا حجم الخط ممكن يوضع في كومبو اخر و هكذا
اريد تغير لون الخط عن الكتابه من الاسود الى الاحمر