[RESOLVED] vb.net improve programs

[eurostar_italia]

at the end i solved in this way :

Dim partenzaStations = From n In treno1.AsEnumerable()
				   Where n.Field(Of String)("Partenza") IsNot Nothing
				   Select n.Field(Of String)("Partenza")

				   Dim arrivoStations = From n In treno1.AsEnumerable()
				   Where n.Field(Of String)("Arrivo") IsNot Nothing
             			 Select n.Field(Of String)("Arrivo")

				Dim stations = partenzaStations.Concat(arrivoStations).Distinct().OrderBy(Function(s) s).ToArray()

			       ComboBox1.DataSource = stations.ToArray
				ComboBox1.SelectedIndex = -1

maybe it will help somebody else