敲机房的时候遇到这个问题，变量在赋值前被使用
原因：没有实例化
应改成：
Dim FacadeGroupQuery As New Facade.GroupQueryFacade
什么是实例化？
在面向对象的编程中，通常把用类创建对象的过程称为实例化，其格式如下：
类名 对象名 = new 类名（参数1，参数2...参数n）;
如 Date date=new Date();就是用日期类创建了一个日期的对象，就叫对象的实例化。
多数语言中，实例化一个对象 就是为对象开辟内存空间，或者是不用声明，直接使用
new 构造函数名（），建立一个临时对象。
那么：
Dim FacadeGroupQuery As New Facade.GroupQueryFacade 与
Dim FacadeGroupQuery As Facade.GroupQueryFacade 有什么区别？
Dim FacadeGroupQuery As New Facade.GroupQueryFacade是实例化相当于复制
Dim FacadeGroupQuery AsFacade.GroupQueryFacade只是定义了一个类型
欠的账总是要还的，之前学的不牢，现在都要补上了！GO FIGHTING！！
原文链接：https://www.f2er.com/vb/257024.html