[سعود]

ممكن حل أخر بدون التكرار يعني كود واحد يفي بالغرض

هو اللي حيتنفذ كود واحد فقط لكن بناء على شرط هل الميموري ستريم فارغة ام لا ان كانت فارغة هذا يعني لم يتم اختيار صورة سواءا كجديد او تعديل.

PHP كود :

       Dim row As DataRow = dt.NewRow
        row(1) = tname.Text
        row(2) = CDate(dob.Text).ToShortDateString
        If IsNothing(ms) = False Then
            row(3) = ms.ToArray
        End If
        dt.Rows.Add(row)
        da.Update(dt)
        ms = Nothing 


السابق للجديد والتالي للتعديل كمثال

PHP كود :

 Dim i As Integer = BindingContext(dt).Position
        Dim row As DataRow = dt.Rows(BindingContext(dt).Position)
        row.BeginEdit()
        row(1) = tname.Text
        row(2) = CDate(dob.Text).ToShortDateString
        If IsNothing(ms) = False Then
            row(3) = ms.ToArray
        End If
        row.EndEdit()
        da.Update(dt)
 ms = Nothing 


---

الكود اللي كتبته كفكرة فقط بالاتصال المنفصل.