当前位置: 高中信息技术 / 综合题
  • 1. (2019高二下·慈溪期末) 小明基于冒泡排序算法编写了一个VB程序,功能如下:单击“生成”按钮command1,生成n个【10,99】的随机整数赋值给a数组,并在列表框list1中显示。单击“排序”按钮command2,对这组数据进行错位排序(即从前往后依次是最小的,最大的,第二小的,第二大的……依次类推)。在列表框list2中依次输出数据排序的结果,程序运行界面如图所示:

    实现上述功能的VB程序如下:

    Const n=10

    Dim a(1 To 10)As Integer

    Private Sub Command1  Click()

    For i=1 To n

                   ‘①

        List1.Addltem Str(a(i))

        Next i

    End Sub

     Private Sub Command2  Click()

        tmp=1

        For i=1 To n-1

        For j=n To i+1 Step-1

        If  >0 Then    ①

        t=a(j):a(j)=a(j-1):a(j-1)=t

        End If

        Next j

        ②

        Next i

        For i=1 To 10

        List2.Addltem Str(a(i))

        Next i

     End Sub

    1. (1) 程序测试运行后生成如下文件:(A .paixu.frmB .paixu.vbp C .paixu·vbw D .pai×u.exe),其中属于windows系统可执行文件是:(单选,填字母:)
    2. (2) 划线①处应填: 
    3. (3) 加框①、②处代码有错,请改正。

       ② 

微信扫码预览、分享更方便