كيفية التحقق من تكرار الأحرف الحساسة لحالة الأحرف

هذه إحدى الخوارزميات المحتملة:

• قم بتهيئة قاموس يحتوي على أحرف كمفاتيح وأعداد صحيحة كقيم.
• تعداد الأحرف في سلسلة الإدخال.
• إذا كان الحرف الحالي موجودًا في القاموس، فقم بزيادة القيمة.
• وإلا أضف الحرف إلى القاموس واضبط القيمة على 1.
• تهيئة منشئ السلسلة.
• تعداد الأحرف في القاموس.
• إذا كان الحرف الحالي له قيمة أكبر من واحد، ولم يكن حرفًا كبيرًا، فقم بإلحاقه بمنشئ السلسلة.
• قم بإرجاع محتوى منشئ السلسلة.

لقد طرحت هذا بالفعل في سؤالك الآخر على هل هناك أي محول يفعل هذا؟[^]. عليك أن تقرر أولاً ما إذا كنت ستستخدم C# أو VB.NET. بمجرد اتخاذ هذا القرار، احصل على كتاب جيد عن اللغة وادرسه للحصول على فهم جيد للغة وإطارها.

Dim TestString As String = "Whatis4compareToABig44Number"
Dim LstFoundChar As List(Of String) = New List (Of String) 
Dim RepeatedChars As String =""
For i As Integer = 0 to TestString.Length 
 Dim TestChar As String = Strings.Mid(TestString,i,1) 
 If LstFoundChar.Contains(TestChar) Then 
    If RepeatedChars.Contains(TestChar) = False Then
       RepeatedChars= RepeatedChars & TestChar
    End If 
Else 
LstFoundChar.Add (TestChar) 

 End If 
Next