منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] مشكلة غريبة فى textbox - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] مشكلة غريبة فى textbox (/showthread.php?tid=2423)



مشكلة غريبة فى textbox - الحزين اوى - 31-03-14

السلام عليكم

اريد التكست بوكس يستقبل سطرين فقط

عن عمل خاصية multi line مفعلة يستقبل أكثر من سطر وعند تحديد 100 حرف مثلا

يستقبل أكثر من سطر ولكن اريد غلقها على سطرين وفى حالة الضغط على انتر لا ينزل سوا لسطر واحد فقط ويقف وليس أكثر من سطر


RE: مشكلة غريبة فى textbox - ناجي إبراهيم - 01-04-14

السلام عليكم...

الخاصية MultiLine تعني تعدد الأسطر و لكن لا تعمل على تحديد عدد الأسطر، و الخاصية MaxLength لتحديد العدد الأقصى من الرموز المسموح بها و لا دخل لها بعدد الأسطر.

هناك حل بسيط:

1. اضبط الخاصية MultiLine على True.
2. اضبط الخاصية ScrollBars على 1-Horizontal لمنع التفاف النص (انقسام السطر الواحد إلى سطرين أو أكثر بسبب طوله).
3. في الحدث KeyPress لمربع النص اكتب الكود التالي:

كود :
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        If InStr(Text1.Text, Chr(13)) <> 0 Then
            KeyAscii = 0
        End If
    End If
End Sub

4. نرجو الاستفادة و السلام.


RE: مشكلة غريبة فى textbox - الحزين اوى - 01-04-14

تسلم يا غالى كود جميل وملاحظات اجمل يعطيك العافية