计算机二级（VB）机试23.docVIP

PAGE PAGE 1 [模拟] 计算机二级（VB）机试23 一、基本操作题 第1题： 参考答案： 详细解答： 二、简单应用题 第2题： 参考答案： 详细解答： 三、综合应用题 第3题： 参考答案： 首先理清程序提供代码的思路，然后修改程序并编写代码。 ?从程序提供的代码中可以看出，整型数组a的使用范围是本窗体中的所有事件过程，用来存放从文件中读取的数据。在排序中，使用双重循环，外循环每踞环一次，确定内循环循环的次数，内循环就是把本次循环中最大的数，放在数组的最后面，这样就可以实现对这50个数的升序排序。解题步骤： ?第一步：分析题目提供的代码。 Dim a(50) As Integer Private Sub C1_Click() Dim k As Integer，ch As String Open in5.dat For Input AS #1 ch= For k=1 To 50 Input #1, ? ch=ch+Str(a(k) ) + Next k Close #1 Text1.Text= ? End Sub Private Sub C3_Click() Open out5.dat For Output As #1 Print #1, Text2.Text Clos