试题

试题 试卷

logo

题型:综合题 题类:常考题 难易度:普通

浙江省七彩阳光新高考研究联盟2020-2021学年高二下学期信息技术期中联考试卷

某VB程序功能如下:单击“生成”按钮,随机生成n个三位数并在列表框List1中显示,单击“排序”按钮对这组数据进行“大小排序”(即最大、最小,第二大、第二小,第三大、第三小……依次类推),并在列表框List2中依次输出数据排序后的结果,程序运行界面如图所示,请回答以下问题。

(1)、若要清空列表框List1,能实现该功能的语句是(单选,填字母:A . List1.Caption = “”/ B . List1.Text = “”/ C . List1.Clear)。
(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

Dim n As Integer, a(1 To 100) As Integer

Private Sub Command1_Click()

    Dim i As Integer

    n = 14

    Randomize

    For i = 1 To n

        a(i) =

        List1.AddItem Str(a(i))

    Next i

End Sub

Private Sub Command2_Click()

    Dim i, j, flag As Integer

    List2.Clear

    flag = 1

    For i = 1 To n - 1

        For j = n To i + 1 Step -1

            If> 0 Then a(j) = a(j) + a(j - 1)

            a(j - 1) = a(j) - a(j - 1)

           

            End If

        Next j

       

    Next i

    For i = 1 To n

        List2.AddItem Str(a(i))

    Next i

End Sub

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

试题篮