VariantFixVariantEqv
f90VB Modules
f90VBDefs, f90VBVariants
Summary
Performs a bitwise equivalence on two variants.
Syntax
| type(VARIANT) function VariantEqv | (VarLeft, VarRight, iRet) |
| type(VARIANT),intent(in):: | VarLeft |
| type(VARIANT),intent(in):: | VarRight |
| integer(HRESULT_KIND),intent(out),optional:: | iRet |
Arguments
VarLeft and VarRight [Input]
Two variant values. Must be initialized variants.
iRet [Output/Optional]
Upon return, iRet contains S_OK or an error code. See comments for more information.
Comments
The function returns TRUE if each bit in VarLeft is equal to the corresponding bit in VarRight, otherwise it returns FALSE. The variant returned is a numeric type or a VT_BOOL if both VarRight and VarLeft are Boolean types.
Argument iRet
Indicates success or failure of the subroutine. The following codes can be returned in this argument:
| Value returned in argument iRet | Description | |
| S_OK | Success. | |
| DISP_E_BADVARTYPE | One or both of the passed variant types are not a valid type of variant. | |
| DISP_E_TYPEMISMATCH | At least one of the variants could not be coerced to the appropriate type for this operation. | |
| E_INVALIDARG | One of the arguments is invalid. | |
| E_OUTOFMEMORY | Memory could not be allocated for the operation.. | |
Examples
See example for VariantAdd.