+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [كود] طلب كود لتغيير نوع الخط (/showthread.php?tid=39998)
طلب كود لتغيير نوع الخط - paveldida - 14-11-21
السلام عليكم
أحتاج كود لتغيير نوع خط الكتابة في جميع تاكست بوكس الفورم دفعة واحدة او في مجموعة دون غيرها
RE: طلب كود لتغيير نوع الخط - asemshahen5 - 15-11-21
تفضل هذا الكود :
PHP كود :
Dim fn As New Font("Arial", 8, FontStyle.Bold)
For Each Tx As Control In Controls
If TypeOf (Tx) Is TextBox Then
Tx.Font = fn
End If
Next
RE: طلب كود لتغيير نوع الخط - paveldida - 15-11-21
ممكن شرح بسيط للكود
RE: طلب كود لتغيير نوع الخط - asemshahen5 - 15-11-21
تفضل الكود مع الشرح :
PHP كود :
'' تعريف متغيير جديد بنوع الخط
Dim fn As New Font("Arial", 8, FontStyle.Bold)
'' عمل لوب عل كل الادوات الموجودة على الفورم
For Each Tx As Control In Controls
'' كتابة جملة شرطية تحدد غذا كان المتغيير Tx من نوع صندوق نص
If TypeOf (Tx) Is TextBox Then
'' وضع المتغيير الخاص بنوع الخط للاداة التي حققت الشرط
Tx.Font = fn
End If
Next
RE: طلب كود لتغيير نوع الخط - paveldida - 16-11-21
بارك الله فيك أخي
لاكن وضعت الكود في بوتون لاكن لم يشتغل
RE: طلب كود لتغيير نوع الخط - asemshahen5 - 16-11-21
هذا مثال به ما تريد انشاء الله :
[attachment=27236]
RE: طلب كود لتغيير نوع الخط - paveldida - 17-11-21
بارك الله فيك