الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اريد جملة سليكت كيس

مغلق
بدأه walled_aall@hot في 14 مايو 2005 · 5 رد · 1,201 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

عايز جملة Select Case علي Text Box

وفيه جملة If 4

اول شرط لو كان الحرف اليه انا ببحث عنه في اول الجملة يستبدله بالقيمة اليه انا هدهله

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

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

ولو كان الحرف لوحده يستبدله بالقيمة اليه انا هدهله

ياريت الكود سريعا وجزاكم الله عني خيرا

www.acrowing.com

اول موقع عربي لرياضة التجديف

#2

اخى الفاضل تستطيع عمل الاتى..........

1-معرفة مكان الحرف باستخدام الامر InStr

2-قم بالاستبدال بالاوامر Right,Left

3-يمكنك الاستبدال بالدالة Replace

وجارى تحضير مثال لما تريده :rolleyes:

تم تعديل هذه المشاركة بواسطة ghost2010 في 14 مايو 2005 في 19:24

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#3

تفضل يااخى مثال لما طلبته به كيفية البحث والاستبدال بطريقتين وان لم تجد ماتريد فأرجو اخبارى:rolleyes:

Select Case.rar

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#4

شكر وهشوف وارد عليك يارب يطلع ده قصدي

www.acrowing.com

اول موقع عربي لرياضة التجديف

#5

المشكلة يا اخي انا المستخدم هو اليه هيكتب الكلام يعني مثلا

النص:

وليد عبد الحميد العرقسوسي

الاستبدال:

لو لقيت ال ع في وسط اي كلمة استبدله ب 4452

لو لقيت ع في اول اي كلمة استبدله ب 689

ياريت يكون وضح المشكلة اني المستخدم هو اليه بيكتب يعني انا معرفش مكان ع مثلا ممكن يكون فين 2 حرف او 3 حرف او الحرف الكام عايز حل ضروري

www.acrowing.com

اول موقع عربي لرياضة التجديف

#6

اذا فكرت قليلا فى الكود الموجود فى الملف عرفت الحل......

الحل ببساطة هو البحث بواسطة الدالة Instr والتى تعيد لك مكان وجود الحرف ثم عمل مقارنة بين مكان الحرف وطول النص وبناءا على ذلك تستطيع اجراء عملية الاستبدال.....اذا لم تكن الفكرة واضحة فأخبرنى :rolleyes:

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

هذا الموضوع مغلق.

مواضيع مشابهة