试题

试题 试卷

logo

题型:综合题 题类:模拟题 难易度:普通

浙江省宁波市镇海中学2020届高三6月信息技术考前模拟试卷

小天使舞蹈队编排一个舞蹈。该舞蹈要求人数为偶数,其中 1 位同学领舞,其站位始终不变,舞蹈队形 变化时,其余同学按逆时针顺序移动站位。我们把所有跳舞的同学从领舞开始依次编为数字 1~n(n 为偶 数),然后把队伍编号按 U 形走向分成两列,即得到第一次队形。从第二次队形开始,固定编号 1(领舞), 其余编号均按逆时针方向移动一个位置,即为该次队形;以后各次队形以此类推,直到除领舞外的所有同学 按逆时针转完一圈为止。

例如,节目人数为 6 时队形变化情况如下:

小嘉为此编写了一个 VB 程序,功能如下:在文本框 Text1 中输入跳舞的同学 n(n 为偶数),单击“队形

变化”按钮 Command1,在列表框 list1 中输出每次变化后的队形。程序代码如下,运行效果如图所示。

Private Sub Command1_Click() Dim a(1 To 20) As String

Dim result As String, t As String

Dim n As Integer, i As Integer, j As Integer n = Val(Text1.Text)

For i = 1 To n

    ①    

Next i

For i = 1 To

result = " "

List1.AddItem "第" & Str(i) & "次:" For j = 1 To n \ 2

result = a(j) + " " +   a(n – j + 1 ) List1.AddItem result

Next j

    ②    

For j = n To 3 Step -1 a(j) = a(j - 1)

Next j

a(2) = temp

Next i End Sub

请回答下列问题:

(1)、语句 List1.AddItem result 中的 AddItem 是(单选,填字母:A .方法名/B .过程名/C .事件名)
(2)、实现上述功能的 VB 代码如下,请在划线处填入合适代码。

 ② 

(3)、程序中加框处代码有错,请改正。
举一反三
返回首页

试题篮