تواجهني مشكلة واحدة الآن مع البرنامج الذي أصممه وهي كيف لي أن أحدد النص كاملاً من ضغطة زر .
وكيف لي أن أظلل الكلمة التي يريد المستخدم أن يبحث عنها من خلال النص الذي كتبه .
تحديد النص كاملاً ؟!
مغلق
طبعا لا يوجد على الجهاز الذي اعمل عليه الان فيجوال بيسك
ولكن يمكنني ان ادلك على اسم الدالة التي تحقق هذا الغرض وهي
SelText
SelStart
ولا اتذكر الثالثة
على العموم كلها تبدأ بالكلمة Sel وهي موجودة في كائن TextBox
يعني يمكنك كتابة Text1.sel لترى هذه الدوال الثلاث
بعد اذنك أخى مصعب سأكمل الكود:
Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1)
السلام عليكم
كود البحث عن كلمة في نص
Private Sub Command1_Click() p1 = InStr(1, Text1, Text2.Text, vbTextCompare) If p1 > 0 Then Text1.SelStart = p1 - 1 Text1.SelLength = Len(Text2.Text) - 1 Text1.SetFocus End If End Sub
الإنسان الذي يقول بأنه لا يمكن عمل شيء يجب ألا يعيق مطلقاً الإنسان الذي يقوم بعمل ذلك الشيء.
إن تخطئ فأنت إنسان ... أما أن تلوم جهازك الكمبيوتر على خطأك فهذا أكثر إنسانية.
مشكورين شباب كثير وخاصة يا prof 1982 .
وشكرا للأخ مصعب غيلان .
هذا الموضوع مغلق.