vb点虐 取外网ip vbnet addressof

VB2013，VB点虐 外网IP获取问题！

直接对服务器请求。（该服务器要有相对的功能,连线后控件属性即包含，可设置自动回报）

专注于为中小企业提供成都网站设计、网站制作服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业张家界免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了近千家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

找一个网页，内容含有显示浏览者ip的网址。抓该网页的内容分析获取外网的字串。

提供一个安全网址给你：

是APNIC亚洲数据中心的首页 的子页

vb点虐 如何获取本机的外网ip？ 是外网

像藤蔓的树般，越来越强烈。

还有上了门的商铺，遮阳布上

我曾用太阳对你说，它在一切纯贞的事物上微笑，将青春的躯体染成金色

撼动了丛林和房屋。

我的朋友肯定是只鸟--

如一么中雾中的花一样神秘。哈哈

如何查看（或用VB.NET之类的程序）电脑的公网IP

如果你是拨号连接，你就直接在宽带连接的详细信息里面看，那就有，要是通过家用路由器上网，就登录路由器，在状态里面也可以看到的

VB点虐 2015 如何获取外网IP并保存到软件目录下的IP.txt文件

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted

Dim str As String

str = Me.WebBrowser1.Document.Body.InnerHtml

Dim a As Integer = 0

Dim b As Integer = 0

a = InStr(str, "[")

b = InStr(str, "]")

TextBox1.Text = Mid(str, a + 1, b - a - 1)

End Sub

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Me.WebBrowser1.Navigate("

)

End Sub

End Class

网页上显示的有点问题，form1_load 中代码是：Me.WebBrowser1.Navigate("")

原理：访问查IP网页后，获取网页上显示的本机外网ip地址