Dim web As new windows.forms.webbrowser web.Navigate("https://s.1688.com/selloffer/-CAFDC2EBD3A1BBA8-1046457.html?spm=b26110380.sw0.0.0.pfGSFx&cps=1&n=y&uniqfield=pic_tag_id") Do Until web.ReadyState = 4 Application.DoEvents Loop
Dim getReader = new System.IO.StreamReader(web.DocumentStream, Encoding.Default) Dim str = getReader.ReadToEnd() output.show(str)