تقييم الموضوع :
  • 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
الرد
تم الشكر بواسطة:



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


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