用vb设计一个程序，求大神指点。

[yangl3025]

界面如图所示，
在text1输入原网址，当按下command1后，可以在text2中显示跳转后的最终网址。求大神指点。

[threenewbee]

Set http = CreateObject("WinHttp.WinHttpRequest.5.1") http.Option(6) = 0 http.open "GET", "http://t.cn/RhIGMCJ", False http.send MsgBox http.getResponseHeader("Location")