تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
احتاج الى الكود لتحويل الارقام الى حروف
#1
السلام عليكم ورحمة الله وبركاته
 احتاج الى الكود سورس لبرنامج vb6 
لتحويل الارقام الى حروف مع الفاصلة (الاجزاء) و بالدرهم
مثال
يحول 23.55 الى ثلاثة وعشرون درهما و خمسة و خمسون سنتيما
جزاكم الله خيرا
الرد }}}
تم الشكر بواسطة:
#2
يا هشام،

بامكانك البحث في المنتدى، فهذا الموضوع متوفر بكثرة

فقط اكتب (تفقيط) في مستطيل البحث في الأعلى يسارا مثل هذه الصورة

الرد }}}
#3
السلام عليكم ورحمة الله
انت تريد دالة قراءة الارقام " التفقيط " كما وضح اخونا الوادي
 صحيح لو بحثنا سنجد اكثر من موضوع يقودنا الى الحل
عموما

تفضل في المرفقات

.rar   NumricText.rar (الحجم : 2.25 ك ب / التحميلات : 92)
الرد }}}
#4
الله الله
ولا اروع
الله يجزيكم بالف خير
وعيد مبارك سعيد

هذا ماكنت ابحث عنه بالضبط
بقي شيء بسيط جدا اذا كان بإمكان احد الاخوة يصلحه
وهـــــــــــــــو:
الرقم 2 يكتب --درهمان-- بدل-- اثنان درهما -- نفس الشيء بالنسبة لـ 102و1002 و 10002......
العدد 5 يكتب -- خمسة دراهم -- بدل --خمسة درهما-- نفس الشيء بالنسبة لـ للاعداد من 3 الى 10 و من 3 الى 10 بعد المائة والالف ......
و "درهم" بالنسبة للاعداد 1 و 100 و 101 و 1000 و 1001 درهم ..............
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , princeofislam
#5
يا أمير (إسم على مسمى)،

فتحت المرفق بالمفكرة ونقلت كود الموديول لل VB.NET لتجربته،

طبعا اضطررت لوضع التعريفات التالية
PHP كود :
Dim LEpPSPOUNDSVVPSResultWORDINTEGERWORDPSncC1str1C2str2C3str3C4str4C5str5C6str6 

بالاضافة لوضع كلمة Strings قبل كل من الكلمات Right وLeft

فكانت النتيجة (ولا أروع) سرقت التعبير من هشام. Big Grin
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , princeofislam
#6
اخي هشام
سنجد لها حل بإذن الله
اخي الوادي
لا لا هذا الكود للأمانة ليس من كتابتي في الحقيقة
هذا الموديل وجدته في احدى المشاريع المفتوحة المصدر لبعض الاخوة في هذا المنتدى والله اعلم و استفدت منه بصراحة واستخدمته في الكثير من مشاريعي . واردت الاستفادة منه في مثل هذه الاسئلة
اسأل الله ان يغفر لصاحب هذا الكود ويجزاه الخير
الرد }}}
تم الشكر بواسطة: الوادي , rnmr
#7
يا أمير (إسم على مسمى)،

كل مالك تكبر في نظري.

أنتم كبير من قبل.....
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , princeofislam , princeofislam
#8
تسلم اخي الوادي ما عليكم زود
تفضل اخي هشام  هذا هو التعديل





في المرفقات

.rar   NumricText{1}.rar (الحجم : 12.84 ك ب / التحميلات : 50)
الرد }}}
تم الشكر بواسطة: عبد العزيز البسكري , الوادي , rnmr , rnmr
#9
----------------------------
المعذرة اخي
انت و ضعت الفاصلة هكذا (,) بدل (.)
الله يجعل هذا المجهود في ميزان حسناتك

جرب هذا العدد
101,01
يطلع هكذا
مائة ودرهم درهما ودرهم سنتيما ...
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy
#10
اهلا و سهلا




.rar   NumricText{2}.rar (الحجم : 23.7 ك ب / التحميلات : 48)
الرد }}}
تم الشكر بواسطة: عبد العزيز البسكري , rnmr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اختصار الكود حسب المثال المرفق abde6726 2 287 29-10-23, 11:00 AM
آخر رد: abde6726
  اختصار الكود حسب المثال المرفق abde6726 0 223 28-10-23, 05:01 PM
آخر رد: abde6726
Question [vb6.0] عندي مشكلة في هذا الكود حيث انه لا يقبل الا رقم فقط اريد ان يقبل الارقام والاحرف ؟ Microformt 1 277 25-10-23, 04:10 PM
آخر رد: Amir_Alzubidy
Information [vb6.0] كيف اجعل الارقم في التقرير باء الغه الانجليزية حتى لو كان نظام الارقام في الويندوز Microformt 0 204 16-08-23, 10:41 AM
آخر رد: Microformt
  محتاج مثال لتحويل (QR barcode) الي نص scsi7000 2 327 04-08-23, 09:19 AM
آخر رد: scsi7000
  [سؤال] احتاج برنامج يقرأ من اكسل ضروري لو سمحتم mera 0 511 10-06-22, 03:43 PM
آخر رد: mera
Question كيف يمكن تطوير هذا الكود نامل المساعدة ؟؟ Microformt 1 917 22-11-21, 07:51 PM
آخر رد: اسلام الكبابى
Question [vb6.0] هل يمكن تغير نوع خط Label من خلال الكود وكيف ذلك ؟؟ Microformt 2 1,054 10-10-21, 08:58 AM
آخر رد: Microformt
  [سؤال] مساعدة في عمل هذا الكود العبادي 2 11 2,968 09-09-21, 01:29 AM
آخر رد: اسلام الكبابى
  [سؤال] احتاج برنامج يقرأ سطر سطر وينفذ اوامر mera 2 1,105 25-06-21, 02:02 PM
آخر رد: mera

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم