(1)在窗体(名称为Form1,KeyPreview属性为True)上画一个列表框(名称为List1)和一个文本框(名称为Text1),如图1-270(a)所示。编写窗体的KeyDown事件过程。程序运行后,如果按“A”键,则从键盘上输入要添加到列表框中的

admin2019-06-11  18

问题 (1)在窗体(名称为Form1,KeyPreview属性为True)上画一个列表框(名称为List1)和一个文本框(名称为Text1),如图1-270(a)所示。编写窗体的KeyDown事件过程。程序运行后,如果按“A”键,则从键盘上输入要添加到列表框中的项目(内容任意,不少于三个);如果按“D”键,则从键盘上输入要删除的项目,将其从列表框中删除。程序的运行情况如图1-270(b)所示。在考生文件夹下有一个工程文件sjt3.vbp(相应的窗体文件名为sjt3.frm),可以实现上述功能。但这个程序不完整,请把它补充完整。

    要求:去掉程序中的注释符,把程序中的?改为适当的内容,使其正确运行,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
    (2)在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程Average 求数组的平均值,请装入该文件。程序运行后,在四个文本框中各输入一个整数,然后单击“求平均值”按钮,即可求出数组的平均值,并在窗体上显示出来(如图1-271所示)。这个程序不完整,请把它补充完整,并能正确运行。

    要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,如表2-141所列在窗体Form1中画出控件并设置它们的属性。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: List1.AddItem Text1.Text For i = 0 To List1.ListCount - 1 If List1.List(i) = Text1.Text Then List1.RemoveItem i 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Start = LBound(a) Finish = UBound(a) Sum = 0 Sum = Sum + a(i) Average = Sum / Finish Aver = Average(arr2()) 步骤2:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://kaotiyun.com/show/o8Up777K
0

随机试题
最新回复(0)