Private Sub btSalvaPosizioni_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btSalvaPosizioni.Click
        If DS_Posizioni.HasChanges() Then 'Se il DataSet è modificato
            Try
                Using CB As New SqlClient.SqlCommandBuilder(DA_Posizioni)
                    DA_Posizioni.UpdateCommand = CB.GetUpdateCommand 'Gestisco l'Update
                    DA_Posizioni.Update(DS_Posizioni.Tables(0)) 'Aggiorno il DB
                End Using
                DS_Posizioni.AcceptChanges() 'Accetto il DataSet
            Catch ex As Exception
                MessageBox.Show("Errore: " & ex.Message, "Aggiornamento Posizioni Campi nel DB", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
            End Try
            MsgBox("Aggiornamento effettuato con successo!", MsgBoxStyle.Information, "Avviso..")
        End If
    End Sub