تبدیل عدد به حروف

[RZ_HAFEZ]

یا تابعی در vb6 وجود دارد که عدد نوشته شده را به حرف تبدیل نمایند
اگر تابعی وجود نداره لطفا راهنمایی در مورد نوشتن چنین برنامه برای من ارسال نمایید
rz_hafezi@yahoo.com:متفکر:

[__siavash__]

یا تابعی در vb6 وجود دارد که عدد نوشته شده را به حرف تبدیل نمایند
اگر تابعی وجود نداره لطفا راهنمایی در مورد نوشتن چنین برنامه برای من ارسال نمایید
rz_hafezi@yahoo.com:متفکر:
تبدیل عدد به حروف یعنی چی ؟
مثلا میخوای عدد 2 بشه "دو" یا اینکه فرمتشو بکنی String ؟
شاید منظورت اینا باشه !!!


Type Conversion Functions

Each function coerces an expression to a specific data type.
Syntax
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression)
CVar(expression)


مثالشم اینه:


CStr Function Example

This example uses the CStr function to convert a numeric value to a String.
Dim MyDouble, MyString
MyDouble = 437.324 ' MyDouble is a Double.
MyString = CStr(MyDouble) ' MyString contains "437.324".

[RZ_HAFEZ]

میخوام در یک text بنویسم 2 و در text دیگه ای بصورت اتوماتیک نوشته بشه "دو"
اعدادی که میخوام وارد کنم چند رقمی هستند
مثلا 999 نوشته شود نهصد و نود ونه

[__siavash__]

میخوام در یک text بنویسم 2 و در text دیگه ای بصورت اتوماتیک نوشته بشه "دو"
اعدادی که میخوام وارد کنم چند رقمی هستند
مثلا 999 نوشته شود نهصد و نود ونه
نه این که تابع داخلی ویژوال بیسیک نداره باید خودت بنویسیش !
اول عدد ورودی به تابع رو ببین چند رقمی هستش بعد شرط بذار که اگر مثلا یک رقمی بود تو یه دستور Select Case حالتی که یک باشد مقدار تابع بشود "یک" و... حالا اگر دو رقمی بود اونو تفکیک کن بازم تو یه دستور Select Case اگر رقم اول 2 بود مقدار "بیستو " و رقم دوم هم رو با Call کردن تابع اول بذار جولوش و به همین ترتیب برو جلو !
البته شاید راهها ی بهتری هم داشته باشه !

[noorsoft]

این برنامش دیگه دنبالش نگرد

[حامد مصافی]

مفصلاً بحث شده.
مرجع حل مشکلات زبان فارسی و سورسهای مربوطه (http://www.barnamenevis.org/forum/showthread.php?t=15209)

[RZ_HAFEZ]

کاربر noorsoft
لطفا در مورد این کد توضیحی بدهید
اگر امکان دارد
تا یاد بگیرم

[RZ_HAFEZ]

لطفا توضیح بیشتری بدهید

[subsub]

من یکی نوشتم. هر عددی رو می تونه بخونه. اعشاری، صحیح، منفی، مثبت و ....
9292
البته یه چیزی.
اصل کار همون ماژوله. ولی من این رو برای یکی از دوستانم نوشتم و بعضی از توضیحات برای اونه.
اگه مشکلی داشتید در خدمتیم.

[noorsoft]

لطفا توضیح بیشتری بدهید
داخل یک حلقه اعداد را سه رقم سه رقم جدا میکنیم و بهد با توجه به موقعیت عددی ( صد - هزار - میلیون و ..) اعداد را معادل حروفیشان را بدست می آوریم

[zarzari]

این برنامش دیگه دنبالش نگرد

اقای نnoorsoft ممکن برنامه رو دوباره بذارین .
الان که تاپیک خالیه و چیزی نداره .
ممنون.

[ali_habibi1384]

اگه یه جستجو توی سایت می کردی 10 تا نمونه ازش پیدا می کنی!!!!!!!!

[__siavash__]

این یه نمونش