下面的程序代码实现将一个一维数组中元素向右循环移动，移位次数由文本框Text1输入。例如数组各元素的值依次为0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10; 移动三次后，各元素的值依次为 8, 9, 10, 0, 1,2 3,4,5,6,7。
Private Sub MoveRight (x() As Integer)
Dim i As Integer
Dim j As Integer
Dim k As Integer
i = UBound (x)
j = x(i)
For k = i To 【7】 Step -1
【8】
Next k
x(LBeund(x)) = j
End Sub
Private Sub Command1_click()
Dim a(10) As Integer
Dim i As Integer
Dim j As Integer
Dim k As Integer
For i = 0 To 10
a(i) = i
Next i
j = Val(Text1. Text)
k=0
Do
k=k+1
Call MoveRight(a)
Loop Until k = j
For i = 0 To 10
Print a(i);
Next i
End Sub

随着网络技术的完善与发展，不少年轻人并不拘泥于在大城市、大公司就业，他们开始在网上开店卖产品，方便了不少消费者，也取得了不错的经济效益。下列关于年轻人开网店的说法正确的是（）

A.这些年轻人既是劳动者，又是经营者、投资者

B.这种经济形式属于集体经济，对实现共同富裕具有重要作用

C.这种经济形式属于个体经济，直接促进社会主义经济的发展

D.这种经济形式属于混合所有制经济，有利于商品流通