VB常用算法（七）數(shù)組元素插入刪除

1、算法說(shuō)明
    數(shù)組中元素的插入和刪除一般是在已固定序列的數(shù)組中插入或刪除一個(gè)元素，使得插入或刪除操作后的數(shù)組還是有序的。
    基本思路：首先要找到插入位置或要?jiǎng)h除的元素。
    1) 插入
    代碼如下：
    Private Sub Command1_Click()
     Dim a(10) As Integer
     Dim i As Integer, k As Integer
     For i = 0 To 9 '生成數(shù)組
     a(i) = i * 3 + 1
     Print a(i);
     Next i
     Print
     Print "插入14"
     For k = 0 To 9 '查找插入14在數(shù)組中的位置
     If 14 < a(k) Then Exit For
     Next k
     For i = 9 To k Step -1 '從最后元素開(kāi)始逐個(gè)后移，騰出位置
     a(i + 1) = a(i)
     Next i
     a(k) = 14 '插入數(shù)14
     For i = 0 To 10
     Print a(i);
     Next i
     Print
    End Sub
    2) 1 4 7 10 13 16 19 22 25 28
    K