Grid[{DateListPlot[ WeatherData["SantaClara", #, {{1988, 6, 19}, {1988, 6, 25}}], Joined -> True, PlotLabel -> #, DateTicksFormat -> {"Day"}, Mesh -> All] & /@ {"Temperature", "WindSpeed"}}, Frame -> All]