Help for this page
Dim is_in is_in=0 ... status=RDR.IsCardIn(is_in) CheckStatus status,"IsCardIn" Loop
[id(0x0000000b), helpstring("method IsCardIn")] HRESULT IsCardIn( [out] VARIANT* is_in, [out, retval] VARIANT* status);