vb.net获取ip,vb文件读取

vb.net 自动获取IP 怎么写

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim cc() As System.Net.IPAddress = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName()).AddressList

Dim str As String = ""

For Each ws In cc

str = str ws.ToString vbCrLf

Next

MsgBox(str)

End Sub

相关问答

Q1: vb.net 怎么获取客户端ip地址？

你最好可以换台电脑访问网址看获取IP地址状况。

如果你测试访问的时候,使用的是 localhost 进行访问的,那么服务器端获得的也就是127.0.0.1，因为localhost是一个环路地址,特殊的.如果你是通过你的ip地址进行访问的,那么获得的IP地址就会是正确的了. 要通过自己本地的IP进行访问,在控制面板的网络连接里找到本地连接,查看它的属性,并找到"详细信息"按钮,点击后弹出的对话框中IPV4地址就是本地地址.或打开命令行,输入 ipconfig /all 即可找到本地地址.在浏览器中通过这个IP地址访问,就不会是127.0.0.1了.

Q2: VB.net 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地址

Q3: vb.net socket中的当客户端连接Server的时候怎么取得客户端的IP地址?

1.绑定的ip是服务器的ip地址，服务器是固定的，客户端连接的是一个已知的服务器端。

2.客户端的话，连接到服务器时，服务器accept后，就可以获得客户端的连接信息，包括ip地址和端口。

我是学c的，在c语言中，socket-bind-listen-accept-....，在accept函数中有选项，如下caddr结构体中就存有accept后客户端的ip地址

连接端口和传输方式等信息，clientsock[1]则为accept新的描述符，如你程序中soc2一样

。

clientsock[1]

=

accept(sfd,(struct

sockaddr*)caddr,len);

vb中应该也有类时的函数，你网上好好找一下，或者看看相关书籍.

Q4: 怎样使用vb.net获取IP地址？请高手帮忙……

MsgBox(System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName).AddressList(0).ToString)这是vb2008里面的格式，这是显示自己的IP，不知你是想要获取哪些IP 呢

Q5: 请问在VB.NET中怎样获取本机IP？

Dim IPAdress As System.Net.IPAddress

HostName = System.Net.Dns.GetHostName '获得本机的机器名

IPAdress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0) '获得本机的IP

Me.TextBox1.Text = HostName '本机机器名

Me.TextBox2.Text = IPAdress.ToString '本机的IP