output.show(sysinfo.computername ) 这样也可以知道机器名
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
OutPut.Show(computerid )
[此贴子已经被作者于2012-10-9 11:37:21编辑过]