如何获取未知下标数组的下标?

hyg1393040

TC中没有没和UBound()功能一样的函数?或者用比较简单的办法实现?

cylhb

整型 长度=0
数组.大小(数组名,长度)//长度被修改为数组的元素个数值

hyg1393040

获得数组各个维数的长度,参数支持动态传参(如:一维数组 整型[] 数组A=整型[100] 可以用 数组.大小(数组A,c1,c2,c3)接收,c2,c3将返回-1,也可以直接只用 数组.大小(数组A,c1)接收)

smallno

中文命名空间: 数组

英文命名空间: array

注意: 该空间函数在解析器内部实现,所以在TC库中没有显示



函数功能: 获得数组各个维数的长度,参数支持动态传参(如:一维数组 整型[] 数组A=整型[100] 可以用 数组.大小(数组A,c1,c2,c3)接收,c2,c3将返回-1,也可以直接只用 数组.大小(数组A,c1)接收)



中文函数原型: 逻辑型 大小(数组名, 整型 c1, 整型c2, 整型 c3)

英文函数原型: bool size(arrayName, int c1, int c2, int c3)



参数:

arrayName: 数组名,这是一个可变类型,请填写正确的数组名,否则将获取失败

c1: 数组一维位置的长度,返回-1表示此位置为空

c2: 数组二维位置的长度,返回-1表示此位置为空

c3: 数组三维位置的长度,返回-1表示此位置为空



返回值: 函数执行成功返回true,假返回false



举例1:

整型[] 数组A=整型[100]

整型 c1

数组.大小(数组A,c1)

辅助.消息框(转换.整型转字符型(c1))



执行结果: 输出数组各个维数的长度 一维位置100



举例2:

整型[][][] 数组A=整型[121][10][1]

整型 c1,c2,c3

数组.大小(数组A,c1,c2,c3)

辅助.消息框(转换.整型转字符型(c1))

辅助.消息框(转换.整型转字符型(c2))

辅助.消息框(转换.整型转字符型(c3))



执行结果: 输出数组各个维数的长度 一维位置121,二维位置10,三维位置1



Example1:

int[] a=int[100]

int c1

array.size(a,c1)

help.messagebox(convert.inttostr(c1))



执行结果: 输出数组各个维数的长度 一维位置100



Example2:

int[][][] a=int[121][10][1]

int c1,c2,c3

array.size(a,c1,c2,c3)

help.messagebox(convert.inttostr(c1))

help.messagebox(convert.inttostr(c2))

help.messagebox(convert.inttostr(c3))



执行结果: 输出数组各个维数的长度 一维位置121,二维位置10,三维位置1