• 0
ArabAttack

التعامل مع النصوص في فيجوال بيسك

سؤال

السلام عليكم ورحمة الله وبركاته

لغة البرمجة : فيجوال بيسك 6

الاستفسار : اخواني انا عندي نربع تكست في كلام وفلنفرض الكلا هو التالي

hello all i love php

فلنفرض انا ابغاه يقص الجزء التالي من النص

all i love

وطبعا ما ابغاه يتعامل عبر رقم الحرف يعني مو اقله من الحرف 7 الى كده

لا ابغا عبر نفس النص يعني من كلمة كدة لكلمة كده

وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

6 إجابة على هذا السؤال .

  • 0

السلام عليكم



Private Sub Command1_Click()
Text3.Text = Replace(Text1.Text, Text2.Text, Text3.Text)
End Sub

Private Sub Form_Load()
Text1 = "hello all i love php" ''النص المراد البحث فيها
Text2 = "all i love" 'النص او الكلمة المراد البحث عنها في النص السابق
Text3 = "" 'النص الجديد المراد استبداله بدل الكلمة المراد البحث عنها
End Sub

وانا شاء الله تكون هي غايتك

وبالتوفيق

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

مشكور اخوي بس مو هذا هو طلبي

انا ابغا مثلا اقله قصه من الكلمة كذا للكلمة كذا

بالتوفيق

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

السلام عليكم

طيب اخي بدل النص


Text2 = "all i love"

ضع النص الجديد بدل الفراغ في النص


Text3 = ""

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

ما ينفع انا ابغا ابحث من كلمة لكلمة اخرى عشان الجزء الي بينهم يتغيير ولا ايش الفائدة من طريقتك

وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

حل طويل بعض الشيئ ولكن يفي بالحاجة


Dim str As String, first As String, last As String
first = "hello"
last = "php"
str = "hello all i love php"
sstart = InStr("hello all i love php", first)
sEnd = InStr("hello all i love php", last)
final = Replace(str, Mid(str, sstart + Len(first), Len(str) - (Len(last) + Len(first))), " ")
MsgBox (final)

قم بوضع النص الذي تريد في المتغير str، و في المتغير first تضع الكلمة الأولى التي تريد الحذف بدئا منها، و في المتغير Last تضع الكلمة التي تريد الحذف إليها!

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

موضوع مفيد اريد وضع سؤال

اريد استخلاص الارقام من داخل جملة مكونة من حروف وارقام

مثال

gdfhy123fdhhjdL>

ليكون الناتج هو الرفم 123 فقط

وكل عام وانتم بخير

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .