المشاركات : 27
المواضيع 2
الإنتساب : Jul 2016
السمعة :
0
الشكر: 10
تم شكره 17 مرات في 13 مشاركات
السلام عليكم ورحمة الله وبركاته
احتاج الى الكود سورس لبرنامج vb6
لتحويل الارقام الى حروف مع الفاصلة (الاجزاء) و بالدرهم
مثال
يحول 23.55 الى ثلاثة وعشرون درهما و خمسة و خمسون سنتيما
جزاكم الله خيرا
المشاركات : 531
المواضيع 4
الإنتساب : May 2016
السمعة :
55
الشكر: 694
تم شكره 535 مرات في 367 مشاركات
05-07-16, 07:38 PM
(آخر تعديل لهذه المشاركة : 05-07-16, 07:38 PM {2} بواسطة الوادي.)
يا هشام،
بامكانك البحث في المنتدى، فهذا الموضوع متوفر بكثرة
فقط اكتب (تفقيط) في مستطيل البحث في الأعلى يسارا مثل هذه الصورة
المشاركات : 2,470
المواضيع 3
الإنتساب : Nov 2014
السمعة :
602
الشكر: 17074
تم شكره 15268 مرات في 2999 مشاركات
السلام عليكم ورحمة الله
انت تريد دالة قراءة الارقام " التفقيط " كما وضح اخونا الوادي
صحيح لو بحثنا سنجد اكثر من موضوع يقودنا الى الحل
عموما
تفضل في المرفقات
NumricText.rar (الحجم : 2.25 ك ب / التحميلات : 92)
المشاركات : 27
المواضيع 2
الإنتساب : Jul 2016
السمعة :
0
الشكر: 10
تم شكره 17 مرات في 13 مشاركات
06-07-16, 05:35 AM
(آخر تعديل لهذه المشاركة : 06-07-16, 06:09 AM {2} بواسطة hicham716.)
الله الله
ولا اروع
الله يجزيكم بالف خير
وعيد مبارك سعيد
هذا ماكنت ابحث عنه بالضبط
بقي شيء بسيط جدا اذا كان بإمكان احد الاخوة يصلحه
وهـــــــــــــــو:
الرقم 2 يكتب --درهمان-- بدل-- اثنان درهما -- نفس الشيء بالنسبة لـ 102و1002 و 10002......
العدد 5 يكتب -- خمسة دراهم -- بدل --خمسة درهما-- نفس الشيء بالنسبة لـ للاعداد من 3 الى 10 و من 3 الى 10 بعد المائة والالف ......
و "درهم" بالنسبة للاعداد 1 و 100 و 101 و 1000 و 1001 درهم ..............
المشاركات : 531
المواضيع 4
الإنتساب : May 2016
السمعة :
55
الشكر: 694
تم شكره 535 مرات في 367 مشاركات
يا أمير (إسم على مسمى)،
فتحت المرفق بالمفكرة ونقلت كود الموديول لل VB.NET لتجربته،
طبعا اضطررت لوضع التعريفات التالية
PHP كود :
Dim LE, p, PS, POUNDS, V, VPS, Result, WORDINTEGER, WORDPS, n, c, C1, str1, C2, str2, C3, str3, C4, str4, C5, str5, C6, str6
بالاضافة لوضع كلمة Strings قبل كل من الكلمات Right وLeft
فكانت النتيجة (ولا أروع) سرقت التعبير من هشام.
المشاركات : 2,470
المواضيع 3
الإنتساب : Nov 2014
السمعة :
602
الشكر: 17074
تم شكره 15268 مرات في 2999 مشاركات
اخي هشام
سنجد لها حل بإذن الله
اخي الوادي
لا لا هذا الكود للأمانة ليس من كتابتي في الحقيقة
هذا الموديل وجدته في احدى المشاريع المفتوحة المصدر لبعض الاخوة في هذا المنتدى والله اعلم و استفدت منه بصراحة واستخدمته في الكثير من مشاريعي . واردت الاستفادة منه في مثل هذه الاسئلة
اسأل الله ان يغفر لصاحب هذا الكود ويجزاه الخير
المشاركات : 531
المواضيع 4
الإنتساب : May 2016
السمعة :
55
الشكر: 694
تم شكره 535 مرات في 367 مشاركات
07-07-16, 12:54 AM
(آخر تعديل لهذه المشاركة : 07-07-16, 12:58 AM {2} بواسطة الوادي.)
يا أمير (إسم على مسمى)،
كل مالك تكبر في نظري.
أنتم كبير من قبل.....
المشاركات : 2,470
المواضيع 3
الإنتساب : Nov 2014
السمعة :
602
الشكر: 17074
تم شكره 15268 مرات في 2999 مشاركات
07-07-16, 03:35 PM
(آخر تعديل لهذه المشاركة : 07-07-16, 03:36 PM {2} بواسطة Amir_Alzubidy.)
تسلم اخي الوادي ما عليكم زود
تفضل اخي هشام هذا هو التعديل
في المرفقات
NumricText{1}.rar (الحجم : 12.84 ك ب / التحميلات : 50)
المشاركات : 27
المواضيع 2
الإنتساب : Jul 2016
السمعة :
0
الشكر: 10
تم شكره 17 مرات في 13 مشاركات
07-07-16, 07:42 PM
(آخر تعديل لهذه المشاركة : 07-07-16, 07:55 PM {2} بواسطة hicham716.)
----------------------------
المعذرة اخي
انت و ضعت الفاصلة هكذا (,) بدل (.)
الله يجعل هذا المجهود في ميزان حسناتك
جرب هذا العدد
101,01
يطلع هكذا
مائة ودرهم درهما ودرهم سنتيما ...
المشاركات : 2,470
المواضيع 3
الإنتساب : Nov 2014
السمعة :
602
الشكر: 17074
تم شكره 15268 مرات في 2999 مشاركات
اهلا و سهلا
NumricText{2}.rar (الحجم : 23.7 ك ب / التحميلات : 48)
|