下面程序的功能是:程序从键盘读取10个数保存到数组a中,将一维数组a中各元素的值移到左一个元素中,而第一个元素的值移到最末一个元素中去。然后,按每行5个数的格式输出。 Option Base 1 Private Sub Command1_Click() Dim a%(10),b%,i%,j% For i = 1 To 10 a(i) = InputBox("请输入一个数:") Print a(i); Next i Print b = (1)________ For i = 1 to 9 (2)__________ Next i a(i) = b For j = 1 To 10 Print a(j); If (3)__________ Then Print Next j End Sub