qianran 获取变体型的具体类型
变体型数据取类型，对于整数小数长整数双精度小数统一为了数值型，如果想要获取其具体类型，可以用以下方法：
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 |
.版本 2 .支持库 spec .子程序 获取变体类型, 整数型 .参数 _VAR, 变体型, 参考 .局部变量 _Addr, 整数型 .局部变量 _Addr_1, 整数型 .局部变量 _VAR_TYPE, 整数型 _Addr ＝ 取数据_通用型 (_VAR) _VAR_TYPE ＝ 指针到整数 (_Addr ＋ 0) 调试输出 (“数据类型: ” ＋ 变体_取类型 (_VAR_TYPE)) 返回 (_VAR_TYPE) .子程序 变体_取类型, 文本型, 公开, 部分特殊类型可能不准 .参数 Code, 整数型 .局部变量 _Code, 整数型 .局部变量 _Msg, 文本型 .如果 (Code ≥ 8192) _Msg ＝ “ - 数组” _Code ＝ Code ％ 8192 .否则 _Code ＝ Code .如果结束 .判断开始 (_Code ＝ 0) _Msg ＝ “Empty” ＋ _Msg .判断 (_Code ＝ 1) _Msg ＝ “Null” ＋ _Msg .判断 (_Code ＝ 2) _Msg ＝ “整数型” ＋ _Msg .判断 (_Code ＝ 3 或 _Code ＝ 14) _Msg ＝ “长整数型” ＋ _Msg .判断 (_Code ＝ 4) _Msg ＝ “小数型” ＋ _Msg .判断 (_Code ＝ 5) _Msg ＝ “双精度小数型” ＋ _Msg .判断 (_Code ＝ 6) _Msg ＝ “货币型” ＋ _Msg .判断 (_Code ＝ 7) _Msg ＝ “时间日期型” ＋ _Msg .判断 (_Code ＝ 8) _Msg ＝ “文本型” ＋ _Msg .判断 (_Code ＝ 9) _Msg ＝ “对象” ＋ _Msg .判断 (_Code ＝ 10) _Msg ＝ “错误” ＋ _Msg .判断 (_Code ＝ 11 或 _Code ＝ 16) _Msg ＝ “逻辑型” ＋ _Msg .判断 (_Code ＝ 12) _Msg ＝ “变体型” ＋ _Msg .判断 (_Code ＝ 13) _Msg ＝ “对象” ＋ _Msg .判断 (_Code ＝ 17) _Msg ＝ “字节型” ＋ _Msg .默认 _Msg ＝ “未知” .判断结束 返回 (_Msg) .子程序 取数据_通用型, 整数型, , 取到的是变量在堆中的地址,和 取变量数据地址() 一样,注意: 字节集数据需要+8,前8位是标准,字节集型数据建议使用 取指针_字节集型() .参数 变量, 通用型, 参考 置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 }) 返回 (0) |
