[多项选择题] 在考生文件夹下有一个工程文件ylc.vbp。在标题为“数组转换窗口”的窗体上创建两个命令按钮,名字分别为Command1和Command2,标题分别为“数据导入”和“数据存盘”。单击“数据导入”按钮后,应用对话框连续输入12个整数,并放入数组Array中。单击“数据存盘”,将该数组的前6个元素与后6个元素互换;即第1个与第12个,第2个与第11个元素互换,依此类推。最后互换前后的数组输出到考生文件夹下的data.txt文件中。程序运行界面如图31所示。要求实现题目给出的功能,并将文件保存在考生文件夹下,工程文件名为ylc.vbp。
正确答案:(A)Visual Basic集成环境中,执行“文件”→“打开工程”命令,选择ylc.vbp文件打开。 (B)在工具箱中选择单选按钮控件,在窗体上创建两个命令按钮,名字分别为CommandA和CommandB,标题分别为“数据导入”和“数据存盘”。 (C)双击“数据导入”按钮,d出代码窗口,在其中添加如下代码: Dim ArrayA(A To AB) As Integer Private Sub CommandA_Click() For i=A To AB ArrayA(i)=I
参考解析:本题主要考查了数组的 *** 作和文件输出的实现。利用InputBox函数d出对话框来输入数组元素,然后交换其中的数据。题中数组有12个元素,因此需要交换6次。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)