2. 计算机
  3. 在考生文件夹下有一个工程文件sjt3．vbp，已给出了所有控件和部分程序。程序运行时，请按以下顺序操作： 1)单击“读入数据”按钮，可把考生目录下的文件in3．dat中的100个整数读到数组a中； 2)从名称为Listl的列表框中选中一项(

在考生文件夹下有一个工程文件sjt3．vbp，已给出了所有控件和部分程序。程序运行时，请按以下顺序操作： 1)单击“读入数据”按钮，可把考生目录下的文件in3．dat中的100个整数读到数组a中； 2)从名称为Listl的列表框中选中一项(

admin2016-01-31  46
问题 在考生文件夹下有一个工程文件sjt3．vbp，已给出了所有控件和部分程序。程序运行时，请按以下顺序操作：
    1)单击“读入数据”按钮，可把考生目录下的文件in3．dat中的100个整数读到数组a中；
    2)从名称为Listl的列表框中选中一项(如图3-60所示)。
    3)单击“计算”按钮，则可按该选项的要求计算出结果并放到文本框中。
    4)单击窗体右上角的关闭按钮结束程序。
    “读入数据”按钮的Click事件过程已经给出，请为“计算”按钮编写适当的事件过程实现上述功能。
   
    注意：不得修改已经存在的程序，在结束程序运行之前，必须进行一次计算，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。
选项
答案审题分析 本题在命令按钮的单击事件中先利用循环统计字符串中大写字母和小写字母的值。首先假设数组中的第一个元素既为最大值也为最小值，然后依次从第二个元素开始向后循环，对每一个数组元素都加以判断，若其比最大值还大，则其成为新的最大值；若其比最小值还小，则其成为新的最小值。这样循环结束后可以得到数组的最大值和最小值。 接下来判断列表框中选中的是哪一项然后执行对应计算，并输出结果。 操作步骤 步骤1：打开考生文件夹中的本题工程文件sjt3．vbp，双击窗体中的“计算”命令按钮，在打开的代码编辑窗口中编写其单击事件过程。 参考代码： PriVate Sub Command2_Click() Dim k As Integer，i1，i2 As Integer i1=a(1)：i2=a(1) For k=2 To 100 If a(k)＞i1 Then i1=a(k) End If If a(k)＜i2 Then i2=a(k) End If Next k If List1．Selected(0)=True Then Text1．Text=i1一i2 End If If List1．Selected(1)=True Then Text1．Text=i1+i2 End If If List1．Selected(2)=True Then Text1．Text=i1*i2 End If End Sub 步骤2：按键运行程序，单击“读入数据”按钮，然后在列表框中选择一项，并单击“计算”按钮，统计出结果。 步骤3：单击窗体右上角的关闭按钮以结束程序。 步骤4：按要求将文件保存至考生文件夹中。 考点链接 选择控件、For循环结构
解析
转载请注明原文地址:https://kaotiyun.com/show/UrLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)