Al otro lado de la pantalla
Os propongo un problema muy sencillo. Tenéis que dar vuestra idea de cual creéis que es la mejor estructura de datos para este problema.
O como pensáis que se puede representar de distintas formas. Podéis aportar una manera posible, la que más os guste.
Se trata de:
En un mes o más tengo distintos periódicos de distintas editoriales, cada uno de una fecha. Y quiero saber "cuales" periódicos
tengo de "una fecha concreta".
Bien. Al principio había pensado en un diccionario de estructuras u objetos.
Pero claro, si la clave es la fecha, cuando dos tengan la misma fecha, se pisa al anterior.
Quería algo más directo, mas rápido. Hasta ahora lo he hecho de esta forma:
Public Sub Main()
Dim adiario As New String[][]
adiario.Add(["01/12/2014", "Diario de Cádiz"])
adiario.Add(["01/12/2014", "La Voz de Cádiz"])
adiario.Add(["02/12/2014", "El Baluarte de Cádiz"])
adiario.Add(["02/12/2014", "Viva Cádiz"])
adiario.Add(["02/12/2014", "Diario de Cádiz"])
PresentarPeriodicos("01/12/2014", adiario)
End
Public Sub PresentarPeriodicos(fecha As String, cdiarios As String[][])
Dim diario As String[]
For Each diario In cdiarios
If diario[0] <> fecha Then
Continue
Else
Print diario[1]
Endif
Next
End
Dim adiario As New String[][]
adiario.Add(["01/12/2014", "Diario de Cádiz"])
adiario.Add(["01/12/2014", "La Voz de Cádiz"])
adiario.Add(["02/12/2014", "El Baluarte de Cádiz"])
adiario.Add(["02/12/2014", "Viva Cádiz"])
adiario.Add(["02/12/2014", "Diario de Cádiz"])
PresentarPeriodicos("01/12/2014", adiario)
End
Public Sub PresentarPeriodicos(fecha As String, cdiarios As String[][])
Dim diario As String[]
For Each diario In cdiarios
If diario[0] <> fecha Then
Continue
Else
Print diario[1]
Endif
Next
End
Naturalmente la acción de presentar el periódico es algo muy simple. Podíamos hacer cosas más complejas.
En este caso es saber cuales tengo de una fecha concreta. Por otro lado el nombre de la ciudad se repite como el ajo.
Saludos
