تنسيق نسبة مئوية

[Akram Galal]

السلام عليكم ورحة الله وبركاتة

تحية طيبة لكل أعضاء المنتدى

أريد عمل تنسيق النسبة المئوية بدون منازل عشرية في التكيست بوكس

داخل فورمة

جزاكم الله خيراً .

تم تعديل مايو 18, 2015 بواسطه Akram Galal

[الصـقر]

اخى الكريم

 كان افضل ارفاق ملف 

لكن عموما  لو فرضنا عندك التكست بوكس 1 هو المطلوب تنسيقه نسبة مئويه 

جرب هذا الكود 

Private Sub TextBox1_AfterUpdate()
Me.TextBox1 = Format(Me.TextBox1, "%0")
End Sub

الكود هو حدث بعد تحديث التكست اى بعد الكتابه به 

يعنى لو كتبت 20 ووضغطت انتر ستجد التكست 20 % 

تقبل تحياتى

واى استفسار تحت امرك

[Akram Galal]

بارك الله لك

هو المطلوب

[ياسر خليل أبو البراء]

الأخ الغالي حسام

جزيت خير الجزاء ..بارك الله فيك

 

الأخ الكريم أكرم

يرجى تحديد أفضل إجابة ليظهر الموضوع مجاب ومنتهي