الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

تعدبل في كود حلقي حتي لا يعلق البرنامج

بدأه mzgr2013 في 8 أغسطس 2014 · 0 رد · 508 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1

السادة اعضاء المنتدي 

نحبة طيبة 

انا مبرمج vb6 وانتقلت الي الدوت نت بس واجهتني مشاكل ارجوا منكم مساعدني 

 

مثلا 1- استخدم الكود التالي لاسترجاع البيانات من القاعدة لعرضها في مربعات النص 

فعندما تكون القاعدة فارغة او بها احد الحقول فارغ  يعلق البرنامج 

فكبف اعدل في الكود بحيث يجتاز الكود اذا وجد الحقول فارغة 

 

 

 cmd = New SqlCommand("Select * From emp where id_num = " & TextBox1.Text & " ", con)
            con.Open()
            dr = cmd.ExecuteReader
            
            While dr.Read()
                Me.TextBox2.Text = dr(0)
                Me.TextBox3.Text = dr(2)
                Me.TextBox4.Text = dr(3)
                Me.TextBox6.Text = dr(4)
                Me.dtp1.Text = dr(5)
                Me.ComboBox1.Text = dr(6)
                Me.ComboBox2.Text = dr(7)
                Me.ComboBox3.Text = dr(8)
                Me.TextBox7.Text = dr(9)
                Me.TextBox8.Text = dr(10)
                Me.TextBox9.Text = dr(11)
                Me.TextBox10.Text = dr(12)
                Me.PictureBox1.ImageLocation = (Form1.TextBox6.Text & "\pic\" & TextBox1.Text & ".jpg")
 
            End While
            dr.Close()
            con.Close()

مواضيع مشابهة