Private Sub Form_Load()
    With Winsock1
        Debug.Print "LocalHostName=" & .LocalHostName    '只读 显示本计算机名称
        Debug.Print "LocalIP=" & .LocalIP '只读
        Debug.Print "LocalPort=" & .LocalPort
        Debug.Print "RemoteHost=" & .RemoteHost
        Debug.Print "RemoteHostIP=" & .RemoteHostIP '只读
        Debug.Print "RemotePort=" & .RemotePort
    End With
End Sub

运行结果：

LocalHostName=ABC
LocalIP=192.168.1.9
LocalPort=0
RemoteHost=
RemoteHostIP=
RemotePort=0

RemoteHost 和 RemoteHostIP 的区别

使用 Winsock 控件进行网络编程时，你可能会遇到 RemoteHost 和 RemoteHostIP 这两个属性。尽管这两个属性都与远程主机有关，它们在功能和用途上有所不同。

RemoteHost

RemoteHost 属性通常指的是远程主机的域名或者主机名。当你使用 Winsock 控件连接到远程服务器时，你可以通过这个属性指定服务器的域名或者主机名。例如，如果你想连接到 www.example.com，你可以将 RemoteHost 设置为 "www.example.com"。

RemoteHostIP

RemoteHostIP 属性指的是远程主机的 IP 地址。在某些情况下，你可能需要直接使用远程主机的 IP 地址进行连接，而不是依赖于域名解析。例如，如果你知道服务器的 IP 地址是 192.0.2.1，你可以通过设置 RemoteHostIP 为 "192.0.2.1" 来直接连接到该服务器。

使用场景

‌使用域名（RemoteHost）‌：当你知道远程服务器的域名，但不确定其 IP 地址时，使用 RemoteHost 可以方便地建立连接。Winsock 控件会在后台解析域名到 IP 地址。

Winsock1.RemoteHost = "www.example.com" 
Winsock1.RemotePort = 80
Winsock1.Connect

‌使用 IP 地址（RemoteHostIP）‌：当你知道远程服务器的 IP 地址，或者出于性能考虑想要绕过 DNS 解析时，使用 RemoteHostIP 可以直接建立连接。

Winsock1.RemoteHostIP = "192.0.2.1"
Winsock1.RemotePort = 80
Winsock1.Connect

注意事项

在实际应用中，通常只需要设置其中一个属性（RemoteHost 或 RemoteHostIP），另一个会自动根据设置的情况进行处理。例如，如果你设置了 RemoteHost，则在建立连接前 Winsock 会自动解析域名到 IP 地址。

如果同时设置了 RemoteHost 和 RemoteHostIP，并且两者不一致，那么以 RemoteHostIP 的设置为准。这是因为 IP 地址是直接用于网络通信的，而域名解析可能会引入额外的延迟和不确定性。

总之，选择使用 RemoteHost 还是 RemoteHostIP 取决于你的具体需求和已知信息。如果你不确定远程主机的 IP 地址，使用域名（RemoteHost）会更方便；如果你已经知道 IP 地址，或者想要避免 DNS 解析的开销，使用 IP 地址（RemoteHostIP）会更直接有效。