加上空格
Dim hc As New HttpClient("http://jisutqybmf.market.alicloudapi.com/weather/city")hc.Headers.Add("Authorization","APPCODE " & k)Dim jo As JObject = Jobject.Parse(hc.GetData)output.show(jo.tostring)