Welcome to بیسیک فور ایکس

Register now to gain access to all of our features. Once registered and logged in, you will be able to contribute to this site by submitting your own content or replying to existing content. You'll be able to customize your profile, receive reputation points as a reward for submitting content, while also communicating with other members via your own private inbox, plus much more! This message will be removed once you have signed in.

  • 0
♋Amir♋

تبدیل اعداد انگلیسی به فارسی

سوال

سلام

من توی برنامه با اینکه از فونت فارسی استفاده کردم اماوقتی اجرا میکنم اعداد بصورت انگلیسی هستن

مشکلش چیه؟

پسند شده توسط m007moh

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

4 پاسخ به این سوال تا کنون داده شده است

  • 0

لطفا سورس رو بزارین حل کنیم مشکلتون رو شاید فونت از اعداد فارسی پشتیبانی نمی کنه یا فونت رو درست  ست نکردین 


به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

سلام

من توی برنامه با اینکه از فونت فارسی استفاده کردم اماوقتی اجرا میکنم اعداد بصورت انگلیسی هستن

مشکلش چیه؟

 

خبلب از فونتای فارسی عدداشون فارسی نیس

شما فونت byekan  رو امتحان کن فارسی میشه

 

http://s2.picofile.com/file/8260593884/yekan.ttf.html

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

ربطی به فونت نداره برای تبدیل اعداد  فارسی به انگلیسی باید از Replace استفاده کنید 

Private Label1 As Label
	Dim s As String="1234567890"
End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("L1")
Dim ss As String
ss=Tabdil(s)
Label1.Text=ss
End Sub

Sub Tabdil(matn As String) As String
    Private res As String=matn
     res=res.Replace("0","٠")
    res=res.Replace("1","١")
    res=res.Replace("2","٢")
    res=res.Replace("3","٣")
    res=res.Replace("4","٤")
    res=res.Replace("5","۵")
    res=res.Replace("6","۶")
    res=res.Replace("7","۷")
    res=res.Replace("8","۸")
    res=res.Replace("9","۹")
       Return res
End Sub

تمام 

پسند شده توسط Sina و ♋Amir♋

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !


ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید


ورود به حساب کاربری