[0theghost0]

السلام عليكم

لدي كود اثناء اختياري لاسم او تاريخ يتم اظهار لي البيانات التي احددها وسؤالي هل يوجد كود ابسط وافضل منه للفهم اكثر ؟

اريد كود مبسط مثل parameter 

كود :

Try
           Dim cmd As New OleDbCommand
           cmd.Connection = dbConnect()
           cmd.CommandText = "Select * from CustomerPaid where Cust_Name = '" & cboxname.Text & "'"
           Dim dr As OleDbDataReader
           dr = cmd.ExecuteReader

           While dr.Read()
               txtwebsite.Text = dr("Cust_Website").ToString
               txtwhat.Text = dr("Cust_What").ToString
               txtpaid.Text = dr("Cust_Paid").ToString
               picdate.Value = dr("Cust_Date").ToString
           End While
           dr.Close()

       Catch ex As Exception
           MessageBox.Show(ex.Message, "خطأ في القراءة", MessageBoxButtons.OK, MessageBoxIcon.Error)
       End Try

اتمنى انكم تفيدوني