方法有很多。PHP 就是服务器端编程语言，专门用于生成动态网页的。你也可以用脚本生成网页，脚本的好处就是它再利用率高，我就是用 Bash 脚本 把后台数据转化为可显示的 HTML 网页。当然，最重要的是你需要知道怎么生成网页，网页的代码语法是什么，这些都可以在 w3.org 官网上找到资料。
无刷新加载了些源码，是因为网页采用的是 Ajax 技术，使用 Javascript 动态获取服务器的返回信息，然后写入网页之中。想要获取这一段源码，那就只有执行这一段 JS 代码，否则只是获取网页源码是静态的。执行 JS 解析一般用 Chrome 的 V8 引擎，这在 PHP、Node.js 等脚本语言中广泛使用，至于 VB，，因该也是没问题的，毕竟那个引擎是开源的。但我觉得还是算了吧，还是换一个方式解决问退：
1、按键精灵创建一个浏览器窗口，鼠标模拟点击，然后鼠标模拟复制操作，获取数据。
2、网页版按键精灵，直接调用 IE 解析网页，也可以使用自带的 Plugin.Web.RunJS 命令直接运行 Javascript 语句，直接返回需要的数据。================希望我的回答对你有帮助！
据说有 MultiByteToWideChar 和 WideCharToMultiByte 这两个函数可以使用，但是我没用过！写了2个函数，自己改吧！Public Function uncode(x As Range) As StringOn Error Resume NextMsgBox Asc(Mid(x, 1, 1)) + 65536If x.Columns.Count <> 1 Thenuncode = "Error"Exit FunctionEnd IfIf Len(x) = 0 Then Exit FunctionDim a, b, c, ib = ""For i = 1 To Len(x)a = Mid(x, i, 1)If Asc(a) < 0 Thenuncode = uncode & sixteen(Asc(a) + 65536)Elseuncode = uncode & aEnd IfNextEnd FunctionPublic Function sixteen(m As Long) As Stringn = mx = "": y = ""Do While n <> 0a = n Mod 2n = n \ 2x = a & xLoopDo While Len(x) Mod 4 <> 0x = "0" + xLoopDo While Len(x) > 0Select Case Right(x, 4)Case "0000"y = "0" + yCase "0001"y = "1" + yCase "0010"y = "2" + yCase "0011"y = "3" + yCase "0100"y = "4" + yCase "0101"y = "5" + yCase "0110"y = "6" + yCase "0111"y = "7" + yCase "1000"y = "8" + yCase "1001"y = "9" + yCase "1010"y = "A" + yCase "1011"y = "B" + yCase "1100"y = "C" + yCase "1101"y = "D" + yCase "1110"y = "E" + yCase "1111"y = "F" + yEnd Selectx = Left(x, Len(x) - 4)Loopsixteen = yEnd Function