vb定义数组并赋值 VB编程,将一维数组中10个元素向右循环移n位?
VB编程,将一维数组中10个元素向右循环移n位?定义一个新数组来存储新订单。这是一个通用的算法,但是已经忘记了VB的语法,希望大家也能有所帮助。dim old[10]={1,3,5,7,9,2,4,6
VB编程,将一维数组中10个元素向右循环移n位?
定义一个新数组来存储新订单。这是一个通用的算法,但是已经忘记了VB的语法,希望大家也能有所帮助。
dim old[10]={1,3,5,7,9,2,4,6,8,10}
dim new[10
]dim n,i,newi
n=3
i=0
while i<10
newi=i3
如果newi>=10那么
newi=newi1-10
end if
new[newi]=old[i
]i
while执行