在考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的20个整数读入数组a中,同时显示在Text1文本框中; ②单击“变换”按钮,则数组a中元素的位置自动对调(即第一个数组元素

admin2016-01-31  25

问题 在考生文件夹下有一个工程文件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循环结构。

解析
转载请注明原文地址:https://jikaoti.com/ti/9wJ0FFFM
0

最新回复(0)