VB.Net - Trying to pull in a specific AD Field value, i.e. value = 'DISBL'

I'm using a RecordSet to pull a specific value from the "Description" Field that will eqaul "DISBL".

I tried setting my last line of code (see Code below) originally to pass in a value like this:
ElseIf IsDBNull(objRecordSet.Fields("description").value) = False Then
                strResult = objRecordSet.Fields("description").value = "DISBL'

And received an error that said unable to Convert value to Boolean or something like that. Not at work where I can run it right now. But, I'm hoping someone has been down the primrose path and could tell me how I could possibly pass the "DISBL" Value in. We have other "Description" values in AD so I need to hone in on this specific value.
Thank you for your help Experts,
WDStart Free Trial

1:
2:
3:
4:
5:

objCommand.CommandText = String.Format("Select dnshostname, description, ADsPath FROM 'LDAP:{0}' Where objectClass = 'computer' AND cn='{1}'", ldapPath, host)
objRecordSet = objCommand.Execute()
 
ElseIf IsDBNull(objRecordSet.Fields("description").value) = False Then
                strResult = objRecordSet.Fields("description").value