(1)考牛文件夹下的工程文件sit3.vbp中有一个菜单、两个标签和两个文本框。程序运行时,用鼠标右键单击窗体会弹出一个弹出式菜单(如图3.160所示)。当选巾“计算100以内自然数之和”菜单项时,将计算100以内自然数之和并放入Text1中;当选中“计算

admin2018-07-11  26

问题 (1)考牛文件夹下的工程文件sit3.vbp中有一个菜单、两个标签和两个文本框。程序运行时,用鼠标右键单击窗体会弹出一个弹出式菜单(如图3.160所示)。当选巾“计算100以内自然数之和”菜单项时,将计算100以内自然数之和并放入Text1中;当选中“计算7 1”菜单项时,将计算7 1并放入Text2中。在给出的窗体文件中已经有了全部控件,但程序不完整。请将事件过程中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。

(2)考生文件夹下的工程文件sjt4.vbp中有如图3-161所示的控件。程序功能如下:程序运行时,在Text1中输入一个商品名称,在Text2中输入一个数量,单击“计算”按钮,则会在列表框中找到该商品的单价,乘以数量后显示在Text3中(如图3.161所示);若输入的商品名称是错误的,则在Text3中显示“无此商品”(为方便编程,列表框中的每个单价均为4位(含小数点))。请将事件过程中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: If Button=2 Then PopupMenu mypopmenu For k=n To 1 Step-1 Text2=fact(7) 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: For k=1 To LiStl.LiStCount一1 name=Left(LiStl.LiSt(k),n一1) price=Val(Right(Listl.List(k),4)) Text3=“无此商品” 步骤2:按要求将文件保存至考生文件夹中。

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

最新回复(0)