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

admin2019-06-11  35

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

    注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
    (2)考生文件夹下的工程文件sjt4.vbp 中有如图1-39所示的控件。程序功能如下:程序运行时,在Text1中输入一个商品名称,在Text2 中输入一个数量,单击“计算”按钮,则会在列表框中找到该商品的单价,乘以数量后显示在Text3中(如图1-39所示);若输入的商品名称是错误的,则在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 List1.ListCount - 1 name = Left(List1.List(k), n - 1) price = Val(Right(List1.List(k), 4)) Text3 = "无此商品" 步骤2:按要求将文件保存至考生文件夹中。

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

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