Dim i, a(10)
For i = 0 To 9 Step 1
a(i) = SmartTags("visuf")(i)
Next
For i = 10 To 2 Step -1
a(i)= a(i-1)
a(0)= SmartTags("valuetag")
Next
For i = 0 To 9 Step 1
SmartTags("visuf")(i) = a(i)
Next
This code doesn't work, only tag visuf[0] changes...
What could be the problem. I can compile it, shifting just doesn't work...
What I want is Fifo
For i = 0 To 9 Step 1
a(i) = SmartTags("visuf")(i)
Next
For i = 10 To 2 Step -1
a(i)= a(i-1)
a(0)= SmartTags("valuetag")
Next
For i = 0 To 9 Step 1
SmartTags("visuf")(i) = a(i)
Next
This code doesn't work, only tag visuf[0] changes...
What could be the problem. I can compile it, shifting just doesn't work...
What I want is Fifo