如何让数组向后移一位 编一vb程序，将一堆数组中的元素向左循环移位，移位次数由键盘输入？

编一vb程序，将一堆数组中的元素向左循环移位，移位次数由键盘输入？

Private Sub Command1 Click（）

dim a（11）

对于I=1到11

a（I）=InputBox（“请输入”&I&“数字”

print a（I）&“

next

print

n=InputBox（“输入移动次数”

对于J=1到n

k=a（1）

对于I=1到10

a（I）=a（I 1）

next I

a（11） =k

对于I=1到11

打印a（I）& “

下一步

结束子项

如何让数组向后移一位 数组左移一位 数组循环左移

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。