تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في كود حساب موقع الحرف فى الجملة
#1
السلام عليكم ورحمة الله وبركاته 
ارجو المساعدة في حساب موقع كل حرف فى الجملة  ( مثال ) 
بسم الله الرحمن الرحيم 
ب = 1   س = 2   م = 3   أ = 4   ل = 5   ل = 6   هـ = 7  الخ الخ   

مثال اخر ( الله ) 

أ = (1)  ل = (2) ل = ( 3 )  هـ = ( 4 )  

ولكم جزيل الشكر ودعاء لا ينقطع بالخير والرحمة
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

تفضل

كود :
       Dim OriginalString As String = "بسم الله الرحمن الرحيم"
       Dim NewString As String = ""
       Dim CharIndex As Integer

       For i = 0 To OriginalString.Length - 1
           If Not String.IsNullOrWhiteSpace(OriginalString.Substring(i, 1)) Then
               CharIndex += 1
               NewString += OriginalString.Substring(i, 1) & " = " & CharIndex & " ، "
           End If
       Next
       NewString = NewString.Trim().TrimEnd("،")
       MessageBox.Show(NewString)

الرد
تم الشكر بواسطة: معاند الحظ
#3
جزاك الله كل اخي الحبيب الكود شغال لكن للاسف بيحسب الفاصلة والمسافات
          وسؤال اخر بعد اذنك لو وضعت 28 تكست بوكس علي عدد الحروف الهجائية لكل حرف تكست مع ترتيب موقعه 
هل يصح ام لا  بمعنى تكست بوكس 1 = حرف ا موقعه رقم كذا 
تكست بوكس 2 حرف ب موقعه رقم كذا

جزاك الله خير
الرد
تم الشكر بواسطة:



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


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