извлечь арабское письмо из предложения или слова

Question

Я разрабатываю небольшую программу в vb6, которая будет работать с арабским документом, я хочу подсчитать, сколько вхождений каждой арабской буквы появляется в документе

основных арабских символов

ا أ

пример предложения

البيت الكك ا ز ح ح ح example example 100 100 100 100 100 100 100 100 100 100 100Вопрос.

Я не знаю арабский язык или даже не знаю, как его читать.

Если vb6 не будет работать, я могу использовать vb.net

Answer 1

Будет намного проще использовать VB.Net.

• VB6 имеет патчи поддержку Unicode.
• В VB6 вам , вероятно, потребуется , чтобы изменить системную кодовую страницу ПК на арабский, чтобы иметь возможность читать документ.

---

РЕДАКТИРОВАТЬ : решение воздушного кода в VB.Net, частично основанное на этом ответе . Требуется обработка исключений.

''# You may need a different character encoding here, this is UTF-8
Using sr As New IO.StreamReader("Test.txt", Text.Encoding.UTF8)
  Dim c As Char
  Dim dict As New Dictionary(Of String, Integer)

  Do Until sr.EndOfStream
   c = ChrW(sr.Read)

   If (dict.ContainsKey(c))
     dict(c)+=1
   Else
     dict(c) = 1
   End If
  Loop
End Using

Answer 2

Самый простой способ - сравнить массив всех арабских символов. http://en.wikipedia.org/wiki/Arabic_alphabet