تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سلسلة تعليمية] اكواد متنوعة نافعة
#1
السلام عليكم ورحمة الله وبركاته
لدي اكواد انتفعت بها واحببت مشاركتها
في هذا المنتدى الذي استفدنا منه الكثير والكثير
وسارسلها على شكل متسلسل ومتقطع
إن شاء الله تعالى

طريقة سريعة لاستيراد البيانات الى كومبوبوكس
اسرع من الطريقة العادية بكثير جدا
جربتها على حوالي اكثر من 7000 صف
ولا تتاخر الا ربما ثانيتين
طبعا مجربه على sqlite تستطيع تغيير محول قاعدة البيانات الى ماتحب منها
كود :
ComboBox1.Items.Clear()

       Dim DT As New DataTable
       Dim DA As New SQLiteDataAdapter

       ConOpen()
       DA = New SQLiteDataAdapter("select Name from T1", conne)
       DA.Fill(DT)
       ConClose()

       Dim items = DT.AsEnumerable().Select(Function(d) DirectCast(d(0).ToString(), Object)).ToArray()
       ComboBox1.Items.AddRange(items)
يتبع إن شاء الله
الرد
تم الشكر بواسطة: asemshahen5
#2
دالة تحويل الارقام من العربية الى الانجليزية
كود :
 Public Function ToIndicDigits(ByVal input As String) As String
       Return input.Replace("٠"c, "0"c) _
           .Replace("١"c, "1"c) _
           .Replace("٢"c, "2"c) _
           .Replace("٣"c, "3"c) _
           .Replace("٤"c, "4"c) _
           .Replace("٥"c, "5"c) _
           .Replace("٦"c, "6"c) _
           .Replace("٧"c, "7"c) _
           .Replace("٨"c, "8"c) _
           .Replace("٩"c, "9"c)
   End Function
الرد
تم الشكر بواسطة: asemshahen5 , tryold


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [كود] اكواد جميلة و بسيطة جدا Lema_Syria 0 138 13-09-21, 08:33 AM
آخر رد: Lema_Syria
  [VB.NET] اكواد حل معادلتين مع متغيراتها عاجل نجود 5 1,822 17-08-21, 12:35 AM
آخر رد: ابراهيم ايبو
  [VB.NET] اكواد التعامل مع الفورم : خلفية متدرجة للفورم بعدة طرق مختلفة علي بنيان 27 4,302 13-02-20, 01:00 PM
آخر رد: ابراهيم عمر ابراهيم
  اكواد انشاء متصفح محبه البرمجه 5 2,459 14-07-18, 09:57 PM
آخر رد: YousefOkasha
Thumbs Up [كود] اكواد جديدة Mina Botros 2 1,839 05-07-17, 02:03 AM
آخر رد: Mina Botros
  مجموعة اكواد جديدة asdsoft 3 3,138 01-11-16, 01:46 AM
آخر رد: kanolov

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


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