code_vb_source
Messages postés44Date d'inscriptionmercredi 28 mars 2007StatutMembreDernière intervention31 mars 2011
-
16 août 2008 à 10:09
jrivet
Messages postés7393Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 2012
-
18 août 2008 à 09:35
Retourne le plus grand indice disponible pour la dimension indiquée d'un tableau.
Public Function UBound( _
ByVal Array As System.Array, _
Optional ByVal Rank As Integer = 1 _
) As Integer
Paramètres
* :
Array
Requis. Tableau de tout type de données. Tableau dans lequel vous voulez trouver le plus grand indice possible d'une dimension.
* :
Rank
Facultatif. Integer. Dimension pour laquelle le plus grand indice possible doit être retourné. Utilisez la valeur 1 pour la première dimension, la valeur 2 pour la deuxième, etc. Si l'argument Rank est omis, 1 est supposé.
[javascript:CopyCode('ctl00_rs1_mainContentContainer_ctl22other');
Copier le code]
Dim a(100, 5, 4) As Byte
<!---->
Appel à UBound |
Valeur de retour |
----
<tt>UBound(a, 1)</tt>,
100,
----
<tt>UBound(a, 2)</tt>,
5,
----
<tt>UBound(a, 3)</tt>,
4
Vous pouvez utiliser UBound pour déterminer le nombre total d'éléments dans un tableau, mais vous devez ajuster la valeur de retour pour prendre en compte le fait que les indices commencent à 0. L'exemple suivant calcule la taille totale du tableau <tt>a</tt> de l'exemple précédent :
[javascript:CopyCode('ctl00_rs1_mainContentContainer_ctl23other');
Copier le code]
Dim total As Integer
total = (UBound(A, 1) + 1) * (UBound(A, 2) + 1) * (UBound(A, 3) + 1)
La valeur calculée pour <tt>total</tt> est 3 030, c'est-à-dire 101 * 6 * 5.
Exemple
[javascript:CopyCode('ctl00_rs1_mainContentContainer_ctl27VisualBasic');
Copier le code]
Dim highest, bigArray(10, 15, 20), littleArray(6) AsInteger
highest = UBound(bigArray, 1)
highest = UBound(bigArray, 3)
highest = UBound(littleArray)
' The three calls to UBound return 10, 20, and 6 respectively.
cs_ghuysmans99
Messages postés3983Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 201316 16 août 2008 à 13:04
Ne désirait-il pas avoir l'expliquation en VB6 ?
<title>UBound, fonction</title><style><![CDATA[import url(msdn_ie4.css);]]></style><link disabled= "" href="msdn_ie3.css" rel="stylesheet" />[javascript:alink_4.Click() Long] contenant le plus grand indice
disponible pour la dimension indiquée d'un
<object id="alink_5" type="application/x-oleobject" classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11"></object>[javascript:alink_5.Click() tableau].
Syntaxe
UBound( arrayname [, dimension])
La syntaxe de la fonction UBound comprend les éléments suivants :
Élément, Description, ----
arrayname, Nom de la
<object id ="alink_6" type="application/x-oleobject" classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11"></object>variable de tableau. Respecte les
conventions standard d'affectation de noms aux variables., ----
dimension, Facultatif. Donnée de type Variant (Long). Nombre
entier définissant la dimension dont la limite supérieure est renvoyée.
Utilisez 1 pour la première dimension, 2 pour la deuxième, etc. Si l'argument
dimension est omis, la valeur supposée
est 1.
Remarques
La fonction UBound est utilisée avec la fonction LBound pour
déterminer la taille d'un tableau. Utilisez la fonction LBound pour
connaître la limite inférieure d'une dimension de tableau.
La fonction UBound renvoie les valeurs ci-dessous pour un tableau dont
les dimensions sont les suivantes :
Dim A(1 To 100, 0 To 3, -3 To 4)
Instruction, Valeur renvoyée, ----
UBound(A, 1)
, 100, ----
UBound(A, 2)
, 3, ----
UBound(A, 3)
, 4
_________________________________________________________________________
VB.NETis good ...VB6is better<