Come copiare array dinamici in VB6

Visual Basic 6 ( VB6 ) è un linguaggio di programmazione da parte di Microsoft . La lingua deriva dal linguaggio di programmazione BASIC originale . VB6 è molto più semplice rispetto ad altri linguaggi di programmazione , ma è potente e propria . VB6 utilizza alcuni degli stessi costrutti di programmazione , come le classi , funzioni , cicli, istruzioni condizionali e array . Array VB6 sono utilizzati per memorizzare oggetti di valore simile . Nella codifica di applicazioni , potrebbe essere necessario copiare gli elementi in un array ad un altro, che può essere realizzato con righe di codice VB6 . Istruzioni
1

Aprire Visual Basic 6 .
2

Seleziona " EXE standard " dal nuovo elenco di progetti .
3

Passare alla barra dei menu in alto . Fare clic su "Progetto" e " Aggiungi modulo ". Questo processo aggiungere un modulo di codice standard nel progetto VB6 .
4 Tipo

o copiare e incollare il seguente codice nel modulo .
Pubblico

Sub CopiaArray ( fromArray As Variant , ToArray As Variant ) per

Dim l As Long , lUBound As Long , lLBound As Long

Se (Non IsArray ( fromArray ) ) O (Non IsArray ( ToArray )) Then Exit Sub

lLBound = LBound ( fromArray ) per

lUBound = UBound ( fromArray ) per

ReDim ToArray ( lLBound Per lUBound ) per

Per l = lLBound Per lUBound

ToArray ( l) = fromArray (l ) per

Avanti

End Sub Sub

TestCopyArry ( ) per

Dim i ( 2) As Integer , j ( ) As Integer Dim

ICTR As Integer

i ( 0 ) = 5

i (1) = 8

i ( 2 ) = 10

CopiaArray i, j

ICTR = 0 To UBound ( j ) per

Debug.Print j ( ICTR ) per

Successivo

End Sub

• Come utilizzare sonno in VBA 
• Come creare un database in VB.Net