主题：请问金字塔内如何判断数组未赋值

Set adoConn=CreateObject("Adodb.Connection") '连接数据库

  adoConn.Open"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\test.accdb"              

    trSqlread="select * from sheet1 where stockcode='" & strcode &"'"  

  set rstTmp = adoConn.Execute(trSqlread)

问题来了：1. 数据库查询结果有的值是空值，用MSGBOX 会出现无效使用 NULL值，然后中断了。如何在金字塔中判断数组未被赋值；

              2. 数据集结果只有一条的情况下， FOR 循环按逻辑打印的是查询数据的第一列，输出的是不通结果集同一个字段（纵向值），但测试结果是输出横向的一条结果集的所有字段，这是为啥?

请教了。