28-09-13, 01:43 PM
بسم الله الرحمن الرحيم
السلام عليكمالسؤال:
كيف يمكن تنسيق الرقم حتى يسهل قراءته
اي الرقم 6500
يجب ان يظهر 6,500
تم ارفاق صورة لبرنامج سبق ان عملته بالاكسس فيه تخيل لسؤالي
والف شكر
[سؤال] تنسيق الرقم؟
|
28-09-13, 01:43 PM
بسم الله الرحمن الرحيم
السلام عليكمالسؤال: كيف يمكن تنسيق الرقم حتى يسهل قراءته اي الرقم 6500 يجب ان يظهر 6,500 تم ارفاق صورة لبرنامج سبق ان عملته بالاكسس فيه تخيل لسؤالي والف شكر
28-09-13, 01:52 PM
السلام عليكم ورحمة الله وبركاته
تفضل أخي كود : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click بالتوفيق
تم الشكر بواسطة: kafi2030 , @@أبورائد@@ , mohammed moh , 3booody , kslawy
شكرا اخي
sooriaty على اجابتك تم تجرية الكود كود : Dim x As Double = Val(Me.txt_Shra.Text) والحمد لله هو يعمل بنجاح. ولكـــــــــــن لم اعرف كيف اضع الكود المناسب لجعل الارقام تظهر منسقة، ضمن عرض البيانات بالداتا جريد فيو، حيث ان البيانات يتم عرضها وفق الكود التالي كود : Sub DataGrid_set() ارجو تعديل الكود المذكور اعلاه، حتى اتمكن من عرض البيانات العائدة لسعر المبيع وسعر الشراء منسقة، كما تم اجراءه بالادخال. والف شكر
28-09-13, 04:25 PM
السلام عليكم ورحمة الله وبركاته
بحسب الصور المرفقة لاحظت أنك تحتاج تعديل القيم للعمودين الثاني والثالث فكتبت لك الكود التالي كود : Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load بالتوفيق تم الشكر بواسطة: kafi2030 , @@أبورائد@@ , 3booody , kslawy
تم الشكر بواسطة: sooriaty03
28-09-13, 10:17 PM
السلام عليكم ورحمة الله وبركاته
أيضا ُ يوجد أمر جاهز لهذا الغرض FormatNumber كالتالي كود : MsgBox(FormatNumber(12345.89)) السلام عليكم ورحمة الله وبركاته تم الشكر بواسطة: sooriaty03 , T.ALKATHIRI , 3booody , kafi2030 , kslawy
07-10-13, 11:20 PM
شكراً ابو رائد
جزاك الله خير |
|