A L E N 函 数 - 图1A L E N 函 数 - 图2A L E N 函 数

A L E N 函 数 - 图3A L E N 函 数 - 图4返回数组中元素 行或列的数目

语 法

ALEN ( ArrayName [, nArrayAttribute ])

返 值 类 型

数值型

参 数 描 述

ArrayName

A L E N 函 数 - 图5A L E N 函 数 - 图6A L E N 函 数 - 图7A L E N 函 数 - 图8A L E N 函 数 - 图9指 定 数 组 名 如 果 参 数 仅 包 含 数 组 名 ALEN 函 数 则 返 回 元 素 的 数 目

NArrayAttribute

A L E N 函 数 - 图10A L E N 函 数 - 图11A L E N 函 数 - 图12A L E N 函 数 - 图13确 定 ALEN A L E N 函 数 - 图14 函 数 返 回 的 是 数 组 元 素 的 数 目 数 组 的 行 数 还 是 数 组 的 列数

A L E N 函 数 - 图15A L E N 函 数 - 图16NArrayAttribute 可 以 取 值 为 0 1 或 2

  1. A L E N 函 数 - 图17指定返回数组元素数目

    省略 nArrayAttribute 与指定 nArrayAttribute

A L E N 函 数 - 图18为 0 作用相同

  1. A L E N 函 数 - 图19指定返回数组的行数

续表

  1. A L E N 函 数 - 图20A L E N 函 数 - 图21A L E N 函 数 - 图22A L E N 函 数 - 图23A L E N 函 数 - 图24A L E N 函 数 - 图25A L E N 函 数 - 图26指定返回数组的列数

    如果数组是一维数组 则 ALEN 函数返回 0 没有列

示 例

A L E N 函 数 - 图27A L E N 函 数 - 图28A L E N 函 数 - 图29A L E N 函 数 - 图30A L E N 函 数 - 图31A L E N 函 数 - 图32A L E N 函 数 - 图33下面的示例用 AFONT ( ) 创建了一个包含所有可用字体的名称的数组 ALEN 可用于判断数组的行数 将显示每个字体名称和示范 如果安装了 10 种以上的字体 则只显示前 10 种

CLEAR

A L E N 函 数 - 图34A L E N 函 数 - 图35A L E N 函 数 - 图36A L E N 函 数 - 图37=AFONT(gaFontArray) && 包含可用字体名称的数组gnNumFonts= gaFontArray && 字体名称IF gnNumFonts > 10

gnNumFonts = 10 && 显示前 10 种字体

ENDIF

FOR nCount = 1 TO gnNumFonts

? ALLTRIM(gaFontArray(nCount)) && 显示字体名称

?? ' This is an example of ' ;

+ ALLTRIM(gaFontArray(nCount)) FONT gaFontArray(nCoun t), 8 ENDFOR

请 参 阅

ADEL ( ) , ADIR( ) , AELEMENT( ) , AFIELDS( ) , AINS( ) , ASCAN( ) , ASORT( ) ,

ASUBSCRIPT( ) , DIMENSION , STORE