![](images/userface/image1.gif)
加好友 发短信
等级:贵宾
帖子:35433
积分:178524
威望:0
精华:3
注册:2013/3/30 16:36:00
|
Post By:2014/5/16 8:57:00 [只看该作者]
Dim IPAdress As System.Net.IPAddress dim HostName as string HostName = System.Net.Dns.GetHostName '获得本机的机器名 IPAdress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0) '获得本机的IP OutPut.Show( HostName ) '本机机器名 OutPut.Show(IPAdress.ToString ) '本机的IP
|
|
|