تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف اجعل الأرقام في Text بهذا الشكل 123.456.99 ( قياسي ) إظهار الفواصل
#11
(16-11-16, 10:44 PM)السرور كتب : اخوي، ما علاقة التايمر، انت ما وضحت غير انك تريد التنسيق بهذا الشكل 123،456.99

وبعدين ايه حكاية قياسي اللي بتذكرها كل شوي؟

اخي الكريم


جربت التايمر لكوني لااعلم اين نوضع الكود


أما حكاية ( قياسي ) فهو أحد أنواع تنسيق الرقم كما تعلمته سابقا في أكسس وغيره ( قياسي وثابت وعام  الخ)  وكل نسق يختلف عن الثاني
والقياس هو موضع سؤالي .
 
باختصار أود إذا أدخلت رقم 1234567.99 في TEXT معين يظهر بهذا النسق 1.234.567.99 وهذا نسق قياسي
 
شاكر ومقدرا للجميع

وعذا على الاطاله
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Amir_Alzubidy
#12
بس كدا ما راح تقدر تتعامل معاه على انه رقم بسبب هذا التنسيق

التنسيق هذا يستخدم دائما عند عرض البيانات فقط يعني في Label مثلا وليس في أدواة خاصة بالتحرير

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

.rar   Fotmat Number.rar (الحجم : 1.35 ك ب / التحميلات : 39)
الرد }}}
#14
؟؟؟؟؟؟؟؟؟؟؟؟؟
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Ahmed_Mansoor , Ahmed_Mansoor
#15
شاكر ومقدر لك استاذي الكريم امير


 مثال جميل جدا تشكر عليه


الغريبة ان نسق الرقم القياسي في اكسس سهل جدا أما في VB6 فلا 



تحياتي للجميع
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy
#16
السلام عليكم 

استخم الكود التالي

كود :
Private Sub Text1_LostFocus()

Text1.Text = Format(Val(Text1.Text), "Standard")

End Sub
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Amir_Alzubidy , Ahmed_Mansoor
#17
؟؟؟؟؟؟؟؟؟؟
الرد }}}
تم الشكر بواسطة: Ahmed_Mansoor
#18
شكرا لك اخي [b]sendbad100[/b] 


فعلا  يظهر في الـTEXT النسق الصحيح وعند حفظة واسترجاع سجله يعود الرقم كما كان من غير نسق.
الرد }}}
تم الشكر بواسطة: Ahmed_Mansoor , Ahmed_Mansoor
#19
السلام عليكم ورحمة الله وبركاته


PHP كود :
Private Sub Form_Load()
Text1.Text Format(Text1.Text"0,##0.00")
End Sub
Private Sub Text1_KeyDown(KeyCode As IntegerShift As Integer)
If 
KeyCode 13 Then
Text1
.Text Format(Text1.Text"0,##0.00")
End If
End Sub

Private Sub Text1_LostFocus()
Text1.Text Format(Text1.Text"0,##0.00")
End Sub 

اخي بهذه الطريقة تستطيع تنسيق التكست وبخصوص حدث Text1_KeyDown مفعل مع الضغط على زر Enter لكي يتم التنسيق بعد الكتابة و حدث Text1_LostFocus عندما ترك التكست الى اي كنترول اخر

بالتوفيق
محاسب / أحمد عبد العليم

الى اللقاء ان شاء الله Heart
الرد }}}
تم الشكر بواسطة:
#20
اخي [b]ahmedabdelaliem[/b]

عند تعبأة الـTEXT بالرقم في بداية اضافة السجل يظهر التنسيق المطلوب تمام ( 1.250.22)

وعند استعادة السجل لغرض عرضه يختفي التنسيق / اي غيرثابت التنسيق المطلوب( 1250.22)
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ريد عند النقر على الصف من الجدول المجود على الفورم يظهر رقم الصنف في Text ؟ Microformt 1 331 04-11-23, 10:34 PM
آخر رد: Amir_Alzubidy
Question [vb6.0] كيف اجعل تقرير برنامجي تكون السجلات ملونه مثل الذي في الصورة التأليه ؟ Microformt 0 280 29-10-23, 07:37 PM
آخر رد: Microformt
Lightbulb [سؤال] إظهار قيمة خلية محددة عند النقر على صف معين في DataGrid1 أبو خالد الشكري 4 362 13-09-23, 09:52 PM
آخر رد: أبو خالد الشكري
Information [vb6.0] كيف اجعل الارقم في التقرير باء الغه الانجليزية حتى لو كان نظام الارقام في الويندوز Microformt 0 204 16-08-23, 10:41 AM
آخر رد: Microformt
Question [vb6.0] كيف اجعل الصورة تتحرك تدريجياً الى منتصف الفورة من جهة اليمين ؟ Microformt 1 369 13-04-23, 04:57 PM
آخر رد: Taha Okla
Question [vb6.0] كيف امنع المستخدم إدخال في Text نص عربي اريد إدخال انجليزي فقط ؟ Microformt 5 920 26-11-22, 01:25 PM
آخر رد: عبدالمؤمن
Question [vb6.0] كيف اجعل هذا الشريط يظهر المساحة المستخدمة من قاعدة البيانات؟ Microformt 2 747 05-10-22, 08:53 AM
آخر رد: Microformt
Question [vb6.0] كيف امنع حفظ قناع Text وهوا بشكل التالي ؟؟ Microformt 1 502 30-09-22, 11:53 PM
آخر رد: Taha Okla
Question [vb6.0] كيف اجعل textيقبل فقط إدخال نسبة موأيه بتنسيق التالي ؟؟ Microformt 4 659 28-09-22, 04:54 PM
آخر رد: Microformt
  اريد طريقة لتنفيذ امر داخل TEXT بعد ضغط مفتاح ENTER محمد حمد محمد سليمان 2 1,010 25-01-22, 01:00 AM
آخر رد: محمد حمد محمد سليمان

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


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