25-10-16, 05:49 AM
الاخوة الكرام
السلام عليكم و رحمة الله
استعملت الكود التالي لتحديد جميع التكست بوكس و تعطيلها عند تحميل الفورم
Private Sub Form_Load()
Dim ztext As TextBox
i = 0
For Each ztext In Texts
Text(i).Locked = True
i = i + 1
Next
End Sub
و لكن تظهر رسالة الخطاء التالية ( object required )
فما السبب ايها الاخوة الكرام
و اليكم مرفق
السلام عليكم و رحمة الله
استعملت الكود التالي لتحديد جميع التكست بوكس و تعطيلها عند تحميل الفورم
Private Sub Form_Load()
Dim ztext As TextBox
i = 0
For Each ztext In Texts
Text(i).Locked = True
i = i + 1
Next
End Sub
و لكن تظهر رسالة الخطاء التالية ( object required )
فما السبب ايها الاخوة الكرام
و اليكم مرفق
