NZ系列工具NZ04:VBA网络连接测试

我的教程一共九套及VBA汉英手册一部，分为初级、中级、高级三大部分。是对VBA的系统讲解，从简单的入门，到数据库，到字典，到高级的网抓及类的应用。大家在学习的过程中可能会存在困惑，这么多知识点该如何组织成自己的程序呢？VBA可否能组织一个大型的程序呢？如何让VBA形成一个工具，拿来就用呢？在我的教程完结后，我陆续推出这类技术工具资料，这类工具整合了若干多的VBA知识点，让大家感受到VBA之强大。工具资料共两个系列，一个是YZ系列，一个是NZ系列。今日给大家介绍的是NZ系列工具NZ04:VBA网络连接测试使用说明

【分享成果，随喜正能量】凡事皆可以更坏，坏到尽头就是质变，变成另一种东西；凡事也可以更好，好到尽头仍然是质变，变成另一种存在。。

NZ04 VBA网络连接测试使用说明

这个应用是展现给大家利用VBA完成网络测试的实例。测试的内容有：获取网络信息，含用户名，域名，登录的服务器名；获取网络连接的类型及IP地址；测试与一个固定的网络地址是否可以进行有效的连接。

这个工具的核心技术我封装在一个NzNetwork.xlam加载项中，注意密码是123456789，但强烈建议您不要轻易打开代码窗口，即使打开也要留有备份。工具的应用文件为TestNetwork.xlsm文件，这个文件中给出了以上各个测试的应用。

NZ04工具技术是作为网络测试用的，也可以作为自己开发程序的一部分，希望大家根据自己的应用进行合理的补充及修正。

一获取网络信息

打开这个工具的应用文件TestNetwork.xlsm，如下面的界面,我们点击“获取网络信息”按钮。

点击后在左侧的B列就会返回测试到的结果：

二测试Web URL 连接

在程序的应用部分，我给出的是对https://www.ifeng.com网址的测试，我们在界面上点击：

这个时候会出现测试连接的结果：

当然您也可以给出自己的测试地址，只是要修改应用部分的代码了。

三获取IP地址

此示例还将演示如何检索计算机的 IP 地址，这需要一系列复杂的 Windows API 调用。这不是你经常需要的东西，但是或许在您的工作中的某个时候，您真的需要它。

如下，我们点击“获取IP”地址按钮：

四测试当前计算机的网络连接

这个应用提供给大家的另一项应用是测试连接到的网络是LAN还是WAN。如下面在应用程序部分的测试结果：

WAN口主要用于连接外部网络，如ADSL、DDN、以太网等各种接入线路;而LAN口用来连接家庭内部网络，主要与家庭网络中的交换机、集线器或PC相连。可以说这两类网口一类对外，一类对内。

对于连接的类型，我们可以看一下下面的解释：如果你要连接公司局域网，可以用WAN端口拉网线连过去；如果你要连接学校局域网，可以用WAN端口拉网线连过去；如果你要连接运营商，可以用WAN端口拉网线连到猫/光猫上去；LAN端口连接你自己的设备，笔记本/台式机/打印机等；无线路由器配置的wifi则相当于LAN端口，连接自己的无线设备，手机/ipad/笔记本等；当WAN端口连上外网，LAN端口上的各个设备和路由器一起组成了一个小型局域网，这个局域网内的设备可以互相发现，访问。

学员也可以查阅相关的资料。

这个应用实现了利用VBA对网络的各种测试，应用于高版本及低版本的Excel中，有需要的朋友可以充分利用。

【分享成果，随喜正能量】

下面是NZ系列VBA应用工具：