تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] عدة اسئلة عن النصوص
#1
Question 
بسم الله الرحمن الرحيم




ارجو الاجابة عن هذه الاسئلة و لكم جزيل الشكر (ارجو توضيح و شرح الاكواد اذا امكن)....

1- جملة شرطية انو اذا كانفي التكست بكوس رقم يظهرلي رسالة خطا


2- ان يقول المستخدم بتعين احرف او رموز معينة داخل اكثر من تكست بكوس و البرنامج يجيب الحروف الي بين هذه الحروف يعني مثلا :
الحروف w و e
و النص المكتوب (eduwave)
و بعد الضغط على الزر يظهر (du) ..


اسف خطأ املائي بدل يقول لازم يقوم
لو كان للضمير العربي (واتس اب)Huh
لكان اخر ظهور له منذ زماان بعيدConfused
الرد
تم الشكر بواسطة:
#2
السلام عليكم

- الجواب - 1) :-

كود :
If IsNumeric(Trim$(Text1.Text)) = True Then
   MsgBox "خطأ"
End If

- الجواب - 2) :-

كود :
Dim zStr As String

zStr = Trim$(Text1.Text)
zStr = Mid$(zStr, InStr(1, zStr, "e") + 1)
zStr = Left$(zStr, InStr(1, zStr, "w") - 1)
Text1.Text = zStr

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد
تم الشكر بواسطة:
#3
تسلم دائما متألق
لو كان للضمير العربي (واتس اب)Huh
لكان اخر ظهور له منذ زماان بعيدConfused
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] تحويل النص من ping الى text (التعرف على النصوص) hsansalhh 4 529 26-06-16, 01:52 PM
آخر رد: hsansalhh
  [vb6.0] اسئلة متعلقة بحماية البرنامج من النسخ M_Hasanin 3 975 20-02-16, 07:01 PM
آخر رد: layan2000
Question نقل النصوص makkiessa 3 554 18-08-14, 05:52 PM
آخر رد: makkiessa
  استدعاء النصوص من صفحة ويب makkiessa 2 461 12-08-14, 04:11 PM
آخر رد: makkiessa
  اسئلة متنوعة 2 ahmed3d 3 825 13-02-14, 06:56 PM
آخر رد: ahmed3d
Question اسئلة متنوعة ahmed3d 3 634 03-02-14, 11:12 PM
آخر رد: ahmed3d

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


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