|
Public Class Form1
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim t As New YahooWeatherLib.YahooWeatherForecast("IRXX0018", "f")
Label1.Text = t.rss.channel.item.forecast.high
Label2.Text = t.rss.channel.item.forecast.low
Label5.Text = t.rss.channel.item.title
End Sub
End Class
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.