判一下吧:
If Adodc1.Recordset(1) Is Null Then
Label1.Caption = ""
Else
Label1.Caption = Adodc1.Recordset(1)
End If
If Adodc1.Recordset(1) Is Null Then
Label1.Caption = ""
Else
Label1.Caption = Adodc1.Recordset(1)
End If
if isnull(adodc1.recordset(1)) then
label1.caption=""
else
...........
end if