حل مشكلة كتابة الكلمات العربية في اوامر VB في الاكسس

[zya_sal]

نرجوا من خبراء الاكسس والVB ايجاد حل لمشكلة كتابة الكلمات العربية في اوامر VB في الاكسس مثلا عندما اقوم بكتابة كود في VB     

  IF me.Text = “١”  Then  me.Text1=”دينار”  Else me.Text1=”جنيه”

يرجعلى  الكلمة  باحرف غير مفهومة مثلا   ÌäÇÆíÉ   نرجوا الرد مع الشكر

[ابو فارس2013]

يجب ان تدخل الى اعدادات الجهاز لديك وتقوم باختيار الموقع اي دولة عربية واللغة ايضا تختارها عربية وسوف تحل المشكلة ان شاء الله

[ابو فارس2013]

جرب وان شاء الله خير

تم تعديل فبراير 24, 2015 بواسطه ابو فارس2013

[zya_sal]

شكرا اخى العزيز تم حل المشكلة ولك الف تحية

[كريمو2]

المشكلة عندي عندما يتم لصق اسم عربي  في اوامر VB 

او نسخ من  اوامر VB الى مشاركات المنتدى مثلا

نرى هذه الرموز

وماعرفت ما مشكلتها ؟

[عبدالله المجرب]

 

المشكلة عندي عندما يتم لصق اسم عربي  في اوامر VB 

او نسخ من  اوامر VB الى مشاركات المنتدى مثلا

نرى هذه الرموز

وماعرفت ما مشكلتها ؟

 

 

لحل هذه المشكلة 

اجعل اللغة هي اللغة العربية ثم إنسخ الكود من محرر الأكواد وستظهر اللغة عند لصق الكود في المنتدى بالعربي

[كريمو2]

اخي عبد الله 

شكرا لك 

ولكن هاهي لغة الجهاز عربية والمشكلة مازالت قائمة

 

 

[عبدالله المجرب]

السلام عليكم 

Sub MyMsg()
Dim Mytxt As String
Mytxt = "ÇáÓáÇã Úáíßã æÑÍãÉ Çáå æÈÑßÇÊå"

MsgBox Mytxt

End Sub

هذالكود تم نسخة ولغة الكتابة اثناء العمل على محرر الأكود هي الإنجليزية 

 

 

وهذا هو نفس الكود بعد تغيير اللغة الى العربية بإستخدام Shift + Alt

Sub MyMsg()
Dim Mytxt As String
Mytxt = "السلام عليكم ورحمة اله وبركاته"

MsgBox Mytxt

End Sub

أي أني أقصد تغيير لغة الكتابة بواسطة Shift + Alt

[كريمو2]

Sub MyMsg()
Dim Mytxt As String
Mytxt = "وعليكم السلام اخي عبد الله شكرا لك على الإيضاح"

MsgBox Mytxt

End Sub