[أبو نوره]

PHP كود :

Label5.Text = FormatNumber(v * 79500, 0) 


---

الصفر الاخير اللي الكود يشير لعدد ارقام الكسر العشري، وبما انه 0 فيعني عدم ظهور ارقام عشريه

[Shafaga]

PHP كود :

) Expected 


[أبو نوره]

(22-09-17, 12:55 AM)Shafaga كتب :

PHP كود :

) Expected 


وضح اخى.............

[Shafaga]

Label5.Text = (v * 79500 , 0)
عند اشاره الماوس علي الفاصله (,) يظهر
( ) Expected)
ووضع تحت الفاصله خط يشابه المد
͠

[أبو نوره]

تاكد من الكود اللي في مشاركتي

---

انت في الاول تريد الفاصلة العشريه
ثم طلبت الغائها
ثم في الاخير طلب تنسيق الارقام

[Shafaga]

اعذرني اخي انا مبتدئ ومابعرف شي وانا ماطلبت الفاصله العشريه انا طلبت تقليل الارقام بعدها وبعدين قررت الغيها خالص واتمني تفيدني بتنسيق الارقام

[ابو ليلى]

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

PHP كود :

           Label5.Text = String.Format("{0:#,##0.000}", v) 


[أبو نوره]

(21-09-17, 11:54 PM)Shafaga كتب : اهلا بيكم شباب انا جديد ف المنتدي واتمني تساعدوني في المشكله دي
انا مبتدئ ف البرنامج
عندي ف الform فيها Textbox و Button و Label
بحط قيمه رقميه ف ال Textbox وال Button وظيفتها قسمه القيمه الل ف ال Textbox واظهار النتيجه ف الLabel ف عاوز اخلي النتيجه تظهر بعدد ارقام عشريه معينه
عشان لما احط قيمه وادوس ع الbutton بيظهرلي الرقم وفيه ارقام عشريه كتير اوي

كود :

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Label6.Text = TextBox3.Text / 79500
   End Sub

شكرا مقدما

(22-09-17, 12:06 AM)Shafaga كتب : مشكور سؤال اخير بس لو عايز اخليها من غير ارقام عشريه خالص اعمل ايه ؟

(22-09-17, 12:44 AM)Shafaga كتب : مشكور اخي .. هل في طريقة اخلي الناتج ف الlabel يتقسم 1.000.000.000.000 بحيث يسهل قراءته ؟

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

(22-09-17, 12:48 AM)أبو نوره كتب :

PHP كود :

Label5.Text = FormatNumber(v * 79500, 0) 


---

الصفر الاخير اللي الكود يشير لعدد ارقام الكسر العشري، وبما انه 0 فيعني عدم ظهور ارقام عشريه

[alsouf]

اكتب الشفرة التالية:

كود :

   Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
       If TextBox1.Text = "0" Then
           TextBox1.Clear()
       Else
           Select Case e.KeyChar
               Case "0" To "9", ControlChars.Back, Chr(Keys.Space)
                   e.Handled = False
               Case Else
                   e.Handled = True
           End Select
       End If
   End Sub
End Class

---

اذا اردت عدم ظهور الكسور في النتيجة اكتب الشفرة التالية:
)Label6.Text =CInt( TextBox3.Text / 79500

[muhammad_nasr]

السلام عليكم
اريد كود لالغاء الارقام بعد الفاصلة العشرية وذلك عند التحويل لنسب مئوية وخاصة اثناء تحليل البيانات باستخدام pivote table