vb如何得到for循环中数组的差额？

Question

请教各位大师，在for循环中循环取数得到的数组，能否同时得到前后两个数据的差额？
代码：dim dl(8)
for i=1 to 9
   code="000" & i & ""
   dl(i)=data(code)  
next i
我想在循环中得到dl(8)数组中前一个数和后一个数的的差额，请大师指点，不胜感激。
       

Answer 1

dim dl(8)
for i=1 to 9
  code="000" & i & ""
  dl(i-1)=data(code)   
  if i>1 then debug.print dl(i-1)-dl(i-2)
next i

Answer 2

没看明白楼主表述的是什么意思,是否 If i > 1 Then Debug.Print dl(i) - dl(i - 1) ???

Answer 3

Private Sub Command1_Click()
    Dim dl(8)
    Dim dlT
    
    For i = 1 To 9
      code = "000" & i & ""
      dl(i) = Data(code)
      
      If i > 1 Then
        Debug.Print dl(i) - dlT
      End If
      
      dlT = dl(i)
    Next i
End Sub

Answer 4

笨了 Debug.Print dl(i) - dl(i-1)就可以了

Answer 5

dim a(n),s(n)
你的意思该不会是想算a（1）和a(2)的差值吧……
虽然不太可能……还是写一下比较好
for i=1 to n
过程
s(i)=a(i-1)-a(i)
next 
s（n）这个数组里就是前一个和后一个的差值了吧。思路吧

Answer 6

上面写错了，应该是
FOR I-2 TO N

Answer 7

差额就是 For 循环的步进长度啊！