在VB（Visual Basic）编程中，获取本机的计算机名和IP地址是常见的需求，这在系统信息查询、网络通信或者设备识别等场景下尤为重要。本文将深入解析如何使用VB来实现这一功能，并提供相关源代码供参考。
我们要了解计算机名是操作系统分配给本地机器的一个唯一标识符，通常在Windows系统中可以通过“系统属性”查看。而IP地址（Internet Protocol Address）则是网络中的节点在网络层上进行通信时的逻辑地址，它使得数据能在互联网上正确地传输。
获取计算机名的方法：
在VB中，我们可以使用`System.Environment`类的`MachineName`属性来获取当前计算机的名称。下面是一段简单的VB代码示例：
```vb
Imports System
Module Module1
Sub Main()
Dim computerName As String = Environment.MachineName
Console.WriteLine("计算机名: " & computerName)
Console.ReadLine()
End Sub
End Module
```
这段代码会输出当前计算机的名称到控制台。
接下来，我们来看看如何获取本机的IP地址。在VB中，这通常涉及到网络编程和对`System.Net.NetworkInformation`命名空间的使用。以下是一段示例代码，用于获取本机所有活动网络接口的IPv4地址：
```vb
Imports System.Net
Imports System.Net.NetworkInformation
Module Module1
Sub Main()
Dim ipHostInfo As IPHostEntry = Dns.GetHostEntry(Dns.GetHostName())
For Each ipAddress As IPAddress In ipHostInfo.AddressList
If ipAddress.AddressFamily = AddressFamily.InterNetwork Then
Console.WriteLine("IP 地址: " & ipAddress.ToString())
End If
Next
Console.ReadLine()
End Sub
End Module
```
这段代码首先通过`Dns.GetHostEntry`方法获取主机信息，然后遍历所有IP地址，筛选出IPv4类型的地址并打印出来。
以上两段代码分别实现了获取计算机名和IP地址的功能。在实际应用中，你可以根据具体需求进行调整，比如只获取第一个IP地址，或者处理异常情况等。希望这些代码和解释能帮助你理解VB获取本机计算机名及IP地址的基本方法。如果在使用过程中有任何疑问或建议，欢迎提出，这将有助于代码的改进和优化。
VB获取本机计算机名及IP地址.rar （4个子文件） 
VB获取本机计算机名及IP地址 
Module1.bas 7KB
