¿Cómo utilizar Ubound en VB? !

Supuesto:

Atenuar a() como entero

ReDim a(100) 'Redefinir la matriz a 101 elementos

Original reservado información de la matriz, agregue un nuevo elemento:

ReDim Preserve a(UBound(a) 1) 'Ahora hay 102 elementos de la matriz

(Si no necesita conservar la matriz original información, simplemente elimine la palabra clave Preservar)