在VB.NET中如何使用新浪股票數據接口

vb6.0中做過這個項目，但是vb.net中也遇到這個問題，看看能否交流壹下，剛剛轉vb.net。vb6.0中部分代碼如下：

Dim HttpReq As Object

Dim request As String

HttpReq = CreateObject("MSXML2.XMLHTTP.3.0")

HttpReq.open("GET", uri, False)

HttpReq.send()

'解析返回值

request = HttpReq.responseBody

request = Split(Split(StrConv(request,vbUnicode,&H804),"=")(1),";")(0)