明经通道 Visual LISP 函数  
vlax-safearray-type
 

返回 SafeArray 的数据类型

(vlax-safearray-type var)

参数

var

包含 SafeArray 的变量。

返回值

如果 var 包含 SafeArray,则返回下列整数之一:

2 整数型 (vlax-vbInteger)

3 长整数型 (vlax-vbLong)

4 单精度浮点数 (vlax-vbSingle)

5 双精度浮点数 (vlax-vbDouble)

8 字符串 (vlax-vbString)

9 对象 (vlax-vbObject)

11 布尔值 (vlax-vbBoolean)

12 变体 (vlax-vbVariant)

如果 var 不包含 SafeArray,则返回错误信息。

示例

创建双精度一维数组和字符串二维数组:

_$ (setq point (vlax-make-safearray vlax-vbDouble '(0 . 2)))
#<safearray...>
_$ (setq matrix (vlax-make-safearray vlax-vbString '(1 . 2) '(1 . 2) ))
#<safearray...>

使用 vlax-safearray-type 验证 Safearray 的数据类型:

_$ (vlax-safearray-type point)
5
_$ (vlax-safearray-type matrix)
8

参阅

vlax-make-safearray 函数。

明经通道 版权所有 未经许可 不得传播

 评论