Método de UBound

Artigo
08/01/2011

Retorna o valor de índice mais alto usado na dimensão do VBArray especificada.

function ubound( [dimension : Number] ) : Number

Argumentos

dimension
Opcional. A dimensão do VBArray para o qual o índice de limite superior é desejado. Se omitido, ubound se comporta como se um 1 foi passado.

Comentários

Se o VBArray estiver vazia, o ubound método retornará indefinido. Se dimension é maior que o número de dimensões de VBArray ou é negativo, o método gera uma "Subscrito fora do intervalo" erro.

Exemplo

O exemplo a seguir consiste em três partes. A primeira parte é o código do VBScript para criar uma matriz segura de Visual Basic. A segunda parte é o código de JScript que determina o número de dimensões da matriz de segurança e o limite superior de cada dimensão. Essas partes entram em <HEAD> seção de uma página HTML. A terceira parte é o código de JScript entra no <BODY> seção para executar as duas partes.

<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;
   var a = new VBArray(vba);
   var s = "";
   for (i = 1; i <= a.dimensions(); i++)
   {
      s += "The upper bound of dimension ";
      s += i + " is ";
      s += a.ubound(i);
      s += ".<BR>";
   }
   return (s);
}
-->
</SCRIPT>
</HEAD>

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