Hola a todos y gracias por todo el apoyo de este foro, espero que esten bien de salud en este tiempo de tantas pruebas. Estoy tratando de gestionar un fichero de clientes usando VB.net 2017 BBDD MsAccess (adjunto imagenes). En el fichero principal (donde está el Datagrid) se muestra SOLO alguna información del cliente (Código, Nombre fiscal, NIF, Domicilio, Móvil), la idea es que al dar clic en el DGV o mediante un botón se abra un segundo Formulario (Para edición) con TODA la información del cliente seleccionado en el DGV, os muestro el código que aún no he conseguido hacer funcionar la interacción entre los dos (he buscado durante ya varios - muchos - días). Nuevamente Mil gracias por sus sugerencias!

' aquí cargo el DGV:
' --------------------
Private Sub FrmClientesAr_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Try
conn.Open()
ds.Tables.Add(dt)
Dim SqlCli As String = "SELECT CODCLI,NOFCLI,NOCCLI,NIFCLI,DOMCLI,TELCLI,MOVCLI FROM F_CLI ORDER BY CODCLI ASC"
da = New OleDbDataAdapter(SqlCli, conn)
Dim CB = New OleDbCommandBuilder(da)
CB.QuotePrefix = "["
CB.QuoteSuffix = "]"
da.Fill(dt)
' ----
' enlazar el DataTable al BindingSource
BindingSource1.DataSource = dt
' ----
DgClientesAr.DataSource = dt.DefaultView ' Llenamos
DgClientesAr.Columns(0).HeaderText = "Cod"
DgClientesAr.Columns(1).HeaderText = "Nombre Fiscal"
DgClientesAr.Columns(2).HeaderText = "Nombre comercial"
DgClientesAr.Columns(3).HeaderText = "CC/NIT"
DgClientesAr.Columns(4).HeaderText = "Domicilio"
DgClientesAr.Columns(5).HeaderText = "Teléfono"
DgClientesAr.Columns(6).HeaderText = "Movil"
' el ancho de las columnas
DgClientesAr.Columns(0).Width = 40
DgClientesAr.Columns(1).Width = 180
DgClientesAr.Columns(2).Width = 180
DgClientesAr.Columns(3).Width = 100
DgClientesAr.Columns(4).Width = 210
DgClientesAr.Columns(5).Width = 85
DgClientesAr.Columns(6).Width = 85

' agregar las opciones al combobox
With (ComboBox1)
'cargar los items de opciones para filtrar
.Items.Add("No filtrar")
.Items.Add("Que comience con")
.Items.Add("Que No comience con")
.Items.Add("Que contenga")
.Items.Add("Que No contenga")
.Items.Add("Que sea igual")
.DropDownStyle = ComboBoxStyle.DropDownList
.SelectedIndex = 1
End With

conn.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
' Imagen del fichero principal


' Aquí el código con el que he conseguido abrir nuevo (tampoco logro que se actualice el DGV o la tabla)
Private Sub BotNuevo_Click(sender As Object, e As EventArgs) Handles BotNuevo.Click
Try
Using f As New FrmClientes(CType(Nothing, DataRowView))
'If (f.ShowDialog() = Windows.Forms.DialogResult.OK) Then
If f.ShowDialog = DialogResult.OK Then

Dim view As DataView = TryCast(Me.DgClientesAr.DataSource, DataView)

If (view Is Nothing) Then
Throw New InvalidCastException()
End If

Dim viewRow As DataRowView = view.AddNew()
viewRow.EndEdit()
viewRow.Item("CODCLI") = f.TxtCODCLI.Text
'viewRow.Item("CCOCLI") = f.TxtCCOCLI.Text
viewRow.Item("NIFCLI") = f.TxtNIFCLI.Text
viewRow.Item("NOFCLI") = f.TxtNOFCLI.Text
viewRow.Item("NOCCLI") = f.TxtNOCCLI.Text
viewRow.EndEdit()

End If
End Using
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
' La imágen:
https://ibb.co/Qf0ZBRR