Public Const C_BITCODE_CAST_ERROR = vbObjectError + 6000