成人AV在线无码|婷婷五月激情色,|伊人加勒比二三四区|国产一区激情都市|亚洲AV无码电影|日av韩av无码|天堂在线亚洲Av|无码一区二区影院|成人无码毛片AV|超碰在线看中文字幕

vb定義數(shù)組并賦值 VB編程,將一維數(shù)組中10個元素向右循環(huán)移n位?

VB編程,將一維數(shù)組中10個元素向右循環(huán)移n位?定義一個新數(shù)組來存儲新訂單。這是一個通用的算法,但是已經(jīng)忘記了VB的語法,希望大家也能有所幫助。dim old[10]={1,3,5,7,9,2,4,6

VB編程,將一維數(shù)組中10個元素向右循環(huán)移n位?

定義一個新數(shù)組來存儲新訂單。這是一個通用的算法,但是已經(jīng)忘記了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執(zhí)行