السلام عليكم ورحمة الله وبركاته.........................
أريد دالة تقوم بتوليد الرقم بخمسة خانات مثلا اذا ادخلت الرقم 5 فانه يكتب لي 00005 واذا ادخلت الرقم 333 فغنه يكتب لي على الصورة 00333 ومع ليش على كثرة الاسئلة وماكل هذا الالتعم الفائدة الجميع والسلام عليكم
خلاص شباب توصلت الى حل وهو هذا السطر
(txteno.Text = Replace(Space(5 - Len(txteno.Text)) & txteno.Text, " ", 0
السلام عليكم ورحمة الله وبركاته
طريقة اخرى باستخدام الدالة Format
txtNumber.Text = Format(CInt(txtNumber.Text), "00000")
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
مشكور اخوي على الرد
هذا الموضوع مغلق.