Sigo probando cosas y he cambiado la segunda linea del codigo y me ha quedado de esta forma:
Código:
Dim nombre As New DalaiSyncTableAdapters.Sync_ReplacementsTableAdapter
Dim corto As DalaiSync.Sync_ReplacementsRow = CType(nombre.GetDataByoriginalName(nomEstilo, "E").Rows(0), DalaiSync.Sync_ReplacementsRow)
sin embargo todavia no logro mostrar los valores del resultado... ¿Alguna sugerencia?