ช่วยด้วยครับ คืนสต๊อกโดย ถ้าสินค้าเหลือ 0 ให้ลบคอลัมออก ถ้าคืนไม่หมด ให้อยู่ต่อ

 Dim i As Integer = datagridviewreturn.CurrentRow.Index
        Dim balance As String = datagridviewreturn.Item(6, i).Value
        Dim id_res_out As String = datagridviewreturn.Item(0, i).Value
        sql = "update tbl_restore_out set balance_res_out=balance_res_out-" & Num_return.Value & " where id_res_out='" & id_res_out & "'"
        cmd = New OleDbCommand(sql, conn)
        If cmd.ExecuteNonQuery > 0 Then
            MsgBox("บันทึกข้อมูลสำเร็จแล้วค่ะ")
            If (Convert.ToInt32(balance) <= 0) Then
                sql = "delete from tbl_restore_out where id_res_out='" & id_res_out & "'"
                cmd = New OleDbCommand(sql, conn)
                If cmd.ExecuteNonQuery > 0 Then
                    MsgBox("ข้อมูลที่เบิกได้คืนสต๊อกหมดแล้วค่ะ")
                Else
                    MsgBox(Err.Description)
                End If
            End If
        Else
            MsgBox("ไม่สามารถบันทึกข้อมูลได้ โปรดลองใหม่อีกครั้งค่ะหรือติดต่อแอดมิน ขอบคุณค่ะ")
        End If
        return_restore_stock()
        'delete_out()
        insert_return_stock()
        clear_text_return()
        show_datagrid1()
        show_datagrid2()
        show_datagrid3()
        show_datagrid4()