VB编程:数组中插入新的数组元素-26

简介: VB编程:数组中插入新的数组元素-26

程序代码:

Dim a() As Long

Private Sub Form_Load()

   ReDim Preserve a(1 To 4)   'Preserve:当改变原有数组最末维的大小时,使用此关键字可以保持数组中原来的数据。

   'Dim i As Long, m As Long

   a(1) = 1: a(2) = 2: a(3) = 3: a(4) = 4

   For i = 1 To 4

       Text1.Text = Text1.Text & "a(" & CStr(i) & ")=" & CStr(a(i)) & "; "

   Next i

   i = 2

   Dim n As Long: n = 6

   ReDim Preserve a(1 To 5)

   For i = 2 To 5

       m = a(i)

       a(i) = n

       n = m

   Next i

   For i = 1 To 5

       Text2.Text = Text2.Text & "a(" & CStr(i) & ")=" & CStr(a(i)) & "; "

   Next i

End Sub


小结:

   1、数组中插入新的元素,数组的大小被改变,此时需要使用动态数组,并对数组ReDim重定义    

   2、Preserve:当改变原有数组最末维的大小时,使用此关键字可以保持数组中原来的数据。

相关文章
|
6月前
|
Java
<Java SE> 数组详解大全(附带练习题).一维数组、二维数组、数组拷贝、数组遍历...
<Java SE> 数组详解大全(附带练习题).一维数组、二维数组、数组拷贝、数组遍历
46 0
|
6月前
|
算法 C语言
Leetcode_203.移除链表元素—C语言
Leetcode_203.移除链表元素—C语言
|
C语言
C语言之在数组内删除指定元素x
C语言之在数组内删除指定元素x
176 0
|
6月前
|
存储 C语言
C语言中数组元素插入
C语言中数组元素插入
109 0
|
人工智能
VB编程:数组中删除数组元素-27
VB编程:数组中删除数组元素-27
280 0
|
存储
数据结构(C语言版)实现链栈的创建,赋值随机数,进栈,出栈,取栈顶元素,输出
数据结构(C语言版)实现链栈的创建,赋值随机数,进栈,出栈,取栈顶元素,输出
421 0
数据结构(C语言版)实现链栈的创建,赋值随机数,进栈,出栈,取栈顶元素,输出
|
存储
数据结构(C语言版)实现单链表的创建,赋值随机数,插入,删除,取值,输出
数据结构(C语言版)实现单链表的创建,赋值随机数,插入,删除,取值,输出
580 0
数据结构(C语言版)实现单链表的创建,赋值随机数,插入,删除,取值,输出
VB编程:利用指针实现数组的插入-43
VB编程:利用指针实现数组的插入-43
160 0
VB编程:利用指针实现数组拆分-44
VB编程:利用指针实现数组拆分-44
|
机器学习/深度学习 文件存储
VB编程:对数组进行二分查找-29
VB编程:对数组进行二分查找-29
205 0