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

[mzgr2013 0]

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

نحبة طيبة 

انا مبرمج 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()