Private hf As New HttpClient As "CLI" Private s As String Public Sub Main() s = Temp With hf .URL = "http://wttr.in/Chaves" .Timeout = 10 .Get(Null, s) End With End Public Sub CLI_Finished() hf.Close Print File.Load(s) End