今天，我们就来着手解决这个问题。还是来认识下基于窗体的ListBox和ListView这两个控件吧。
ListView是ActiveX列表视图控件，乍一看，它和ListBox很相似，但是ListView还是不同于它，ListView其实就是一种视图方式的显示，使用上比起ListBox而言更加灵活自由。这主要体现在列表视图表头标题的添加可以自由定义，而ListBox也不是这么容易；还有就是ListView的列表项目数据载入的方式和ListBox不同，ListView是先添加每一行的第一列作为本行的母项目(ListView1.ListItems.Add , ,rs.Fields(rs(0).Name)))，然后再紧接着添加母项目的子项目作为本行后续的列值母项目(ListView1.ListItems(i).SubItems(j) Add , ,rs.Fields(rs(j).Name)))，在这里：rs是记录集合对象实例，rs.Fields(rs(j).Name))是返回rs中第j列字段名rs(j).Name所对应的当前记录的该字段的属性值rs.Fields(rs(j).Name))。有了这个知识了解，大家对我们后续的理解将会更加容易。
下面，我们就一起来解决ListBox和ListView呈现SQL查询结果的问题。
和上一期作品类似，准备简单的用于待查询的数据及添加一个简单的表单控件按钮用于交互。如下图所示
图1 SQL查询的前端Excel数据及交互按钮
我们插入一个窗体，然后在其上面添加两个文本框(第一个文本框用于输入模糊查询的关键字，第二个文本框用于动态跟踪第一个文本框输入的内容状态)，接着添加四个标签用于提示，最后添加一个ListBox、一个ListView，值得注意的是ListView要通过控件工具箱右键附加控件载入。最终效果如下图所示
图2 用于呈现查询结果的后台VBA窗体
(一)点击Excel前端的按钮<利用结构化查询Sql语句输出查询结果到列表框ListBox和列表视图ListView>，即将呈现SQL查询结果的输出窗体。如下图所示
图3 点击按钮<利用结构化查询Sql语句输出查询结果到列表框ListBox和列表视图ListView >欲呈现SQL输出窗体
(三)如果在SQL输出窗体的关键字提示的文本框中输入【姓名】字段查询关键字是不存在的，则ListBox列表框和ListView列表视图也同步呈现为空内容
图5 不存在的【姓名】字段关键字输入后的查询情况
好了，我们接下来看看后台是SQL查询后是如何给ListBox列表框和ListView列表视图传送数据的呢？请大家看看下面的功能代码。
(一)模块1代码截图：
图7 模块1功能定义的数组转置函数代码截图
(二)窗体代码截图：
图8 功能代码截图1
图9 功能代码截图2
图10 功能代码截图3
在这里得补充一下，本来我们可以用最常用的DataGrid数据珊格控件对象更加直接接收SQL的查询结果的，但遗憾的是VBA没有DataGrid数据珊格控件，只能通过从外部引入到Windows目录“Windows\System32\”下面的形式以管理员身份注册，虽说可以注册成功也能看到这个控件，但是不可用，原因在于该控件估计是纯的Visual Basic才能用，而我们Office的VBA却不能使用它的缘故。所以，我们这里就没有用DataGrid数据珊格控件而使用了ListBox和ListView控件做出了同样的效果，望大家理解。
最后，还是老话，非常感谢各位粉丝朋友对我的关注(头条号：跟我学Office高级办公)、推广和点评，有了各位的支持，我会带着各位的鼓励一如既往地推出更多有实用意义的作品，谢谢！
