请问一个VB数线的问题

Question

VB数组的赋值怎么会有滞后性？？？？
如：
For i = 1 + 1 To  20
        temp = bytReceive(i)
        bytReceive(i - 1) = temp 
next i设个watch来看看，怎么那个temp的值会是bytreceive(i-1)的值？？？而运行后等于什么也没有做。

Answer 1

先谢谢了，但还是解决不了。假设bytreceive是这样存放的：
11111111111111111111
22222222222222222222
33333333333333333333但无论intLineNum输入是多少都删除了最后的一行
程序块如下：   
　//intLineNum是被删的某行号,目的是删除整行的20个byte，后面的补上，intReceiveLen为数组长度
  intLineNum = InputBox("请选择要删除的行", "删除", 0, 100, 100)
  For i = (intLineNum - 1) * 20 + 1 To intReceiveLen - 20
      temp = bytReceive(i + 20 - 1)
      bytReceive(i - 1) = temp
     
      strAll = frmMain.txtFinal.Text
  Next i
  intReceiveLen=intReceivelen-20
  redim preserve bytreceive(intreceivelen)

Answer 2

For i = 1 + 1 To  20
        temp = bytReceive(i)
        bytReceive(i - 1) = temp
        doevents 
next i