**تشخیص فارسی یا انگلیسی بودن متن**

[Salar82 901]

سلام دوستان

با یکی دیگه از آموزش ها در خدمتتون هستم.

بعضی وقتها لازمه تو برنامه چک کنیم که آیا متنی فارسیه یا انگلیسیه. اما چطوری؟؟

 

همونطور که می‌دونید، حروف انگلیسی، کوچیک(a) و بزرگ(A) داره. اما فارسی و عربی نه.

میایم و از متدی که تو خود کلاس String هست، استفاده میکنیم تا بتونیم این رو تشخیص بدیم:

Dim word As String 'word that we want to detect
If word.ToLowerCase = word.ToUpperCase Then
    'Its Persian or Arabic
Else
    'Its English
End If

اینجا چک میکنیم که اگر حروف کوچیک متن( ToLowerCase ) و حروف بزرگش( ToUpperCase ) یکی بودن، یعنی متنمون فارسیه یا عربی؛ اما اگر یکی نبود، یعنی انگلیسیه.

تمااام  

 

امیدوارم مفید بوده باشه