آموزش تبدیل عدد به حروف با 1 خط کدنویسی !

[محمدرضا معتمدی 612]

سلامـــ خوبید ؟ خوشید ؟ دنیا بکام هست ؟ شما دیوید هستید ؟

 

خب , میخوایم توی این برنامه عدد رو به حروف تبدیل کنیم , ینی چی , ینی اینکه بیایم شیک و مجلسی کاربر بنویسه مثلا

 

123

 

بعد توی لیبل بزنه صد و بیست و سه  , با استفاده از یه کتابخانه که در پایین پیوست شده

 

این برنامه ناگفته نماند که کـــــــــــــــــــــــــاملا مورد تایید بازار هم هست

 

خب , طبق عادت دستامونو میشوریم و b4a رو باز میکنیم

 

یه ادیت تکست داریم که قراره کاربر توش عدد بنویسه

 

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

 

, اجزای دیزاینرمون رو معرفی میکنیم به کدنویسی و یه متغیر تعریف میکنیم از نوع کتابخانه ی تبدیل عدد به حروفمون

Private Label1 As Label
	Dim mt As Adad_Horof_Salar_fazel
Private EditText1 As EditText

این mt متغیر همین کتابخونه ی تبدیل عدد به حروفه که بازم میگم پایین پیوست شده و دانلود کنید

 

خب , واسه اینکه فقط با زدن روی ادیت تکست , که کارش اینه که عدد توش وارد شه , کیبورد عددی نمایش داده بشه میریم توی دیزاینر و تنظیمات ادیت تکست

 

و InPut Type رو مساویه Numbers قرار میدیم

 

و حالا میریم سراغ یه خط کد نویسی که کار تبدیل عدد به حروف رو انجام میده

 

توی رویداد تکست چنج ادیت تکست مینویسیم ( که هر عددی نوشته شد بلافاضله پایین توی لیبل به حروف نمایان بشه )

Label1.Text=mt.heji_adad(EditText1.Text)

تموم

 

شما یه برنامه تبدیل عدد به حروف ساختید

 

حالا دیگه پر و بال بدید بهش دیگه میتونید امکان کپی کردن رو بزارید براش یا هر امکان دیگه

 

یا مثلا امکان خوندنش , دیگه خود دانید

 

موفق باشید جمیعا

 

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

 

رمز basic4android.org

Adad Be Horoof Library ( basic4android.org).rar

[طاها 480]

داداش کتابخونه کو؟؟!

[محمدرضا معتمدی 612]

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

[مهدی ایزدی 9,203]

آقای معتمدی خیلی ممنون

میبینم که با قدرت برگشتید هااااا

[mohammad_mahdi 451]

خیلی هم عالی. چند روز پیش یکی از بچه ها درباره ساختنش تاپیک زده بود و کمک میخواست. چه خوب که شما ساختینش!