Visual Basic.NET - datos autonumericos

Hola a todos!!!, tengo un problema y necesito ayuda URGENTE.
Tengo un DataSet con varias Tablas, mi problema es que una vez que inserto una fila en una de esas tablas necesito obtener el valor que se le ha dado al campo clave de esa fila que es autonumérico y que al mostrarlo en el DataGrid aparece Null (el valor dado de forma autonumerica sólo aparece cuando vuelvo a cargar el Datagrid).
////// NO FUNCIONA/////

Dim pos As Integer = almacen.Tables("clientes").Rows.Count - 1
fila = almacen.Tables("clientes").Rows(pos)

Dim CB2 As OleDbCommandBuilder = New OleDbCommandBuilder(adapart)
Dim fila2 As DataRow
fila2 = almacen.Tables("articulos").NewRow
fila2 ("IdCliente") = fila("Idcliente") Siempre asigna un cero
almacen.Tables("articulos").Rows.Add(fila2)
adapart.Update(almacen, "articulos")
adapart.Fill(almacen, "articulos")
End Sub

Gracias de antemano. Un saludo.

El problema tiene dificil solución ya que el campo autonumerico lo da la bd, y por lo tanto no se sabrá hasta que actualices el dataset, además si usas access deberás recargar el dataset para recuperar el campo.