Private Sub DataGridView1_RowHeaderMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView1.RowHeaderMouseClick
        If Me.DataGridView1.SelectedRows.Count > 0 Then
            Dim editForm As New frmCarico(Me.MagazzinoDataSet, Me.MagazzinoDataSet.carico.Rows.IndexOf(CType(CType(Me.DataGridView1.SelectedRows(0).DataBoundItem, DataRowView).Row, MagazzinoDataSet.caricoRow)))
            editForm.Show()
        End If
    End Sub