(1)在考生文件夹中有工程文件sjt3.vbp,其中的窗体如图3—162所示。程序刚运行时,会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮,再单击“查找”按钮,则找出数组中的最大值(或最小值),并显示在标签Labe12中

admin2019-06-11  29

问题 (1)在考生文件夹中有工程文件sjt3.vbp,其中的窗体如图3—162所示。程序刚运行时,会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮,再单击“查找”按钮,则找出数组中的最大值(或最小值),并显示在标签Labe12中。

    请去掉程序中的注释符,把程序中的“? ”改为正确的内容。
    注意:考生不得修改窗体文件中已经存在的程序。最后把修改后的文件按原文件名存盘。
    (2)在考生文件夹中有一个工程文件sjt4.vbp。窗体上已有控件,如图3—163所示。请在属性窗口中将List1设置为可以多项选择(允许使用Shift键或Ctrl键进行选择)列表项。要求:双击List1中的某一项时,该项目被添加到List2中,同时在List1中清除该项目。若单击“>>”按钮,List1中所有的项目显示在List2中(List2中已有项目不变),List1中的内容不变。

    要求:按照题目要求设置控件属性,去掉程序中的注释符,把程序中的“?”改为正确的内容。
    注意:不得修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。

选项

答案(1)【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: If Option1.Value=True Then If a(i) >=x Then x=a(i) End If Else If a(i)<y Then y=a(i) End If 步骤2:按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: L2.AddItem L1.List(L1.ListIndex) L1.RemoveItem L1.ListIndex For i=0 To List1.ListCount-1 Call MoveItem(List1,List2) 步骤2:按要求将文件保存至考生文件夹中。

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

最新回复(0)