问答题 在考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的20个整数读入数组a中,同时显示在Text1文本框中; ②单击“变换”按钮,则数组a中元素的位置自动对调(即第一个数组元素与最后一个数组元素对调,第二个数组元素与倒数第二个数组元素对调……),并将位置调整后的数组显示在文本框Text2中。 在窗体文件中已经给出了全部控件(如图3-190所示),但程序不完整。 要求:完善程序使其实现上述功能。
【正确答案】正确答案:审题分析 数组a中元素的位置自动对调(即第一个数组元素与最后一个数组元素对调, 第二个数组元素与倒数第二个数组元素对调……)可以在一个循环中进行,即第i个元素和第20-i+1个元素互换,问题的关键是循环的次数应该是10次而不是20次。 操作步骤 步骤1:打开考生文件夹中的工程文件sjt3.vbp 步骤2:打开代码编辑窗口,编写“变换”按钮的单击事件过程。 参考代码: Private Sub Command2_Click() ′考生编写 For i=1 To 10 temp=a(i) a(i)=a(20-i+1) a(20-i+1)=temp Next i ′以下程序段将已变换的数组元素显示在Text2文本框中 For k=1 To 20 Text2=Text2+Str(a(k))+Space(2) Next k End Sub 步骤3:按键运行程序,先单击“读数据”按钮,然后单击“变换”按钮。 步骤4:单击窗体右上角的关闭按钮以结束程序。 步骤5:按要求将文件保存至考生文件夹中。 考点链接 数组定义与操作、For循环结构。
【答案解析】