|
Visual Basic 6 ( VB6 ) est un langage de programmation de Microsoft. La langue provient de la langue originale de programmation BASIC . VB6 est beaucoup plus simple que les autres langages de programmation, mais il est puissant dans son propre droit . VB6 utilise certains des mêmes constructions de programmation , tels que des classes , des fonctions , des boucles, des instructions conditionnelles et des tableaux. Tableaux VB6 sont utilisés pour stocker des objets de valeur similaire. Dans les applications de codage , vous devrez peut-être copier des éléments dans un tableau à un autre , ce qui peut être accompli avec des lignes de code VB6 . Instructions
1 Ouvrez Visual Basic 6 .
2 Sélectionnez " EXE standard " de la nouvelle liste de projets .
3 Allez dans la barre de menu du haut . Cliquez sur " Project " et " Ajouter un module . " Ce processus va ajouter un module de code standard dans votre projet VB6 .
4 Type de ou copier et coller le code suivant dans le module.
Public Sub CopyArray ( fromArray As Variant , ToArray As Variant )
l As long, lUBound As Long , lLBound As Long
Si (Non IsArray ( fromArray ) ) ou ( Non IsArray ( ToArray ) ) sortent alors Sub
< p> lLBound = LBound ( fromArray )
lUBound = LimiteSup ( fromArray )
ReDim ToArray ( lLBound Pour lUBound )
Pour l = lLBound Pour lUBound
ToArray (l) = fromArray ( l)
Suivant
End Sub Sub
TestCopyArry ()
Dim i ( 2) As Integer , j () As Integer
TPIR As Integer
i ( 0) = 5
i ( 1) = 8
i ( 2) = 10 Photos CopyArray i , j
TPIR = 0 To UBound ( j)
Debug.Print j (TPIR)
Suivant
End Sub
|
