تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طريقة البحث في مربع النص
#1
السلام عليكم



أحبتي المبرمجين 



لدي على الفورم مربعين نص text1 و text2 



أرغب عندما أكتب في ال text1 جملة معينة , يقوم الكود باستخراج كلمات أقوم بتحديدها له مسبقا من النص الموجود في text1 ويضعها في text2



وشكرا لكم 
الرد }}
تم الشكر بواسطة:
#2
تفضل اخى 

  السورس + برنامج الاختبار بالمرفقات
الكود بالسورس سيقوم بعمل البحث على النص
واذا تم ايجاد النص سيتم تظليله فى textbox1 وسيتم نسخ جملة البحث فى textbox2

تحياتى لك
وتمنياتى لك التوفيق


الملفات المرفقة
.zip   Pro Test.zip (الحجم : 3.97 ك ب / التحميلات : 24)
.zip   Test.zip (الحجم : 1.52 ك ب / التحميلات : 22)
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
#3
(15-07-18, 08:45 PM)elgokr كتب :
تفضل اخى الكود
سيقوم بعمل البحث على النص
واذا تم ايجاد النص سيتم تظليله فى textbox1 وسيتم نسخ جملة البحث فى textbox2

كود :
       Dim xx As String
       xx = InputBox("ادخل النص المطلوب البحث عنه:")
       Dim a As Integer
       a = InStr(1, LCase$(TextBox1.Text), LCase$(xx))
       If a > 0 Then
           TextBox1.SetFocus()
           TextBox1.SelStart = a - 1
           TextBox1.SelLength = Len(xx)
           TextBox2.Text = xx
       Else
           MsgBox("لم يتم ايجاد النص المطلوب.")
       End If

تحياتى لك
وتمنياتى لك التوفيق

أشكرك من أعماق قلبي
الرد }}
تم الشكر بواسطة: elgokr
#4
الشكر لله
وتم عمل سورس + برنامج
يحتوي على الكود كاملاً تجنباً من اى اخطاء

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة: dr.mostashar , dr.mostashar , sendbad100


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة عمل تقرير بالداتا ريبورت بعرض الورقة لوندس سفن رجل الكهرباء 0 358 15-02-22, 12:23 AM
آخر رد: رجل الكهرباء
  اريد طريقة لتنفيذ امر داخل TEXT بعد ضغط مفتاح ENTER محمد حمد محمد سليمان 2 427 25-01-22, 01:00 AM
آخر رد: محمد حمد محمد سليمان
  [vb6.0] طريقة تصدير بيانات الداتا ريبورت datareport لصيغة pdf hamada salah90 2 501 01-01-22, 01:17 AM
آخر رد: hamada salah90
  طريقة عمل QR BARCODE VB6.0 hannileo 10 5,468 28-12-21, 04:11 AM
آخر رد: jordaniancopy
  [vb6.0] طلب طريقة عرض الاشخص من نفس الدول في تقرير واحد ahmed201 5 1,303 25-09-21, 03:01 PM
آخر رد: السيد الغالي
  طريقة جمع صفحة صفحة فى الجريد mohhasddx1 0 543 04-08-21, 11:18 PM
آخر رد: mohhasddx1
  طريقة جمع صفحة صفحة فى الجريد mohhasddx1 0 487 04-08-21, 11:16 PM
آخر رد: mohhasddx1
  اريد البحث فى حقل يحتوي على الاسم رباعي الحزين اوى 0 494 19-06-21, 12:15 AM
آخر رد: الحزين اوى
  طريقة حماية البرنامج برقم المعالج layan2000 75 76,899 26-03-21, 08:03 PM
آخر رد: محمد بن عطية
  اهدي اليكم طريقة الاتصال بقاعدة البيانات عن طريقة المشاركه بدون تعديل كود الاتصال ahmed201 1 1,024 25-03-21, 11:35 AM
آخر رد: رضوان الجماعي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم