قديما كنت أكتبة في vb6 بالشكل التالي :
Text1.Text = Left(Text2.Text, 6)
ويعني أن Text1.Text = أول ستة أرقام من اليمين للـــ Text2.Text
فلو كتبنا في Text1.Text الرقم التالي : 12345678586985985
يسجل لي أول سته أرقام من اليسار فقط في Text2.Text = 123456
أو من اليمين
Text1.Text = right(Text2.Text, 6)
كيف يكتب الآن في الـ vb.net لاني حاولت بكثير من الاحتمالات وما نفعه
منها هذا الإحتمال و الذي لم ينجح
TextBox2.Text = Left(TextBox1.Text, 6)
تم تعديل هذه المشاركة بواسطة المهنا في 7 يوليو 2014 في 23:04
من مواضيعي :
إجعل برنامجك يعمل على كل جهاز في العالم
النسخة الاحتياطية الاكثر تطورا على مستوى المنتديات
هذا الكود يحتاج لكثير من الذكاء وقليل من العمل
إليكم بعض المعلومات عن المكتبة الشاملة التي يجهلها الكثير وهي مصممة بالvb6
برنامجين مع السورس كود قديمين جداً
مثال كامل لــانشاء ملف txt*. النصي
الاداة رائعة جدا بكل المقاييس swbbtnba.ocx
كود ممتاز ؟ ومساعدة في الاضافة / الحذف
احلى حركة وجدتها اخيرا بعد وقت طويل
وأخيرا حصلت المعجزة : تحويل الفلم الى صورة متحركة وكانك تشاهد فلما Camtasia Studio
لجلب الارقام من ناحية اليسار
TextBox1.Text = TextBox2.Text.Substring(0, 5)
لجلب أرقام من المنتصف
TextBox1.Text = TextBox2.Text.Substring(2, 5)
لجلب أرقام من اليمين
TextBox1.Text = TextBox2.Text.Substring(TextBox2.TextLength - 3, 3)
بالتوفيق
الف شكر وجزاك الله خيرا
من مواضيعي :
إجعل برنامجك يعمل على كل جهاز في العالم
النسخة الاحتياطية الاكثر تطورا على مستوى المنتديات
هذا الكود يحتاج لكثير من الذكاء وقليل من العمل
إليكم بعض المعلومات عن المكتبة الشاملة التي يجهلها الكثير وهي مصممة بالvb6
برنامجين مع السورس كود قديمين جداً
مثال كامل لــانشاء ملف txt*. النصي
الاداة رائعة جدا بكل المقاييس swbbtnba.ocx
كود ممتاز ؟ ومساعدة في الاضافة / الحذف
احلى حركة وجدتها اخيرا بعد وقت طويل
وأخيرا حصلت المعجزة : تحويل الفلم الى صورة متحركة وكانك تشاهد فلما Camtasia Studio
هذا الموضوع مغلق.