ubound 方法

返回在 VBArray 的指定维中所使用的最大索引值。

safeArray.ubound(dimension)

参数

safeArray

必选项。是一个 VBArray 对象。

dimension

可选项。要获知其索引上界的 VBArray 的维数。如果忽略,ubound 将该参数作为 1 进行处理。

说明

如果 VBArray 为空,ubound 方法将返回 undefined。如果 dim 大于 VBArray 的维数或为负数,该方法将产生一个“下标越界”的错误。

示例

下面的示例包括三个部分。第一部分是用来创建一个 Visual Basic 安全数组的 VBScript 代码。第二部分是 JScript 代码,确定该安全数组的维数和每一维的上界。这两部分都放在 HTML 页中的 <HEAD> 部分。第三部分是位于 <BODY> 部分的 JScript 代码,用来运行其他两个部分。

<HEAD>
<SCRIPT LANGUAGE="VBScript">
<!--
Function CreateVBArray()
   Dim i, j, k
   Dim a(2, 2)
   k = 1
   For i = 0 To 2
      For j = 0 To 2
         a(j, i) = k
         k = k + 1
      Next
   Next
   CreateVBArray = a
End Function
-->
</SCRIPT>

<SCRIPT LANGUAGE="JScript">
<!--
function VBArrayTest(vba)
{
   var i, s;
   var a = new VBArray(vba);
   for (i = 1; i <= a.dimensions(); i++)
   {
      s = "The upper bound of dimension ";
      s += i + " is ";
      s += a.ubound(i)+ ".<BR>";
      return(s);
   }
}
-->
</SCRIPT>
</HEAD>

<BODY>
<SCRIPT language="jscript">
   document.write(VBArrayTest(CreateVBArray()));
</SCRIPT>
</BODY>

要求

版本 3

请参阅

dimensions 方法 | getItem 方法 | lbound 方法 | toArray 方法

应用于: VBArray 对象

NetPc