Dim pLines() As String = {"A", "B", "C", "D", "E", "F"} Dim pTmp() As String = Nothing ReDim pTmp(2) Array.Copy(pLines, 3, pTmp, 0, 3)
Dim pLines() As String = {"A", "B", "C", "D", "E", "F"} Dim pTmp() As String = Nothing ReDim pTmp(2) Array.Reverse(pLines) Array.Copy(pLines, pTmp, 3) Array.Reverse(pTmp)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question