主题：新人求助，如何让狐表访问网络，并自动将返回数据填入单元格

参考代码

Dim hc As New HttpClient("http://hq.sinajs.cn/list=sh601006")
hc.ResponseEncoding = "gb2312"
Dim str As String = hc.GetData()
output.show(str)
str = str.Split("=")(1).replace("""", "")
output.show(str)
Dim ary() As String = str.split(",")
msgbox(ary(0))
msgbox(ary(1))