首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp。窗体上的控件如图所示。程序运行时,若选中“累加”单选按钮,则“10”、“12”菜单项不可用,若选中“阶乘”单选按钮,则“1000”、“2000”菜单项不可用(如图所示)。选中菜单中的一个菜单项后,单击“计算”按
在考生文件夹下有一个工程文件sjt4.vbp。窗体上的控件如图所示。程序运行时,若选中“累加”单选按钮,则“10”、“12”菜单项不可用,若选中“阶乘”单选按钮,则“1000”、“2000”菜单项不可用(如图所示)。选中菜单中的一个菜单项后,单击“计算”按
admin
2020-04-08
27
问题
在考生文件夹下有一个工程文件sjt4.vbp。窗体上的控件如图所示。程序运行时,若选中“累加”单选按钮,则“10”、“12”菜单项不可用,若选中“阶乘”单选按钮,则“1000”、“2000”菜单项不可用(如图所示)。选中菜单中的一个菜单项后,单击“计算”按钮,则相应的计算结果在文本框中显示(例如。选中“累加”和"2000”,则计算1+2+3+…+2000,选中“阶乘”和“10”,则计算10 !)。单击“存盘”按钮则把文本框中的结果保存到考生文件夹下的out4.dat文件中。
要求:编写“计算”按钮的Click事件过程。
注意:不得修改已经存在的程序,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件; 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Commandl_Click() Dim i As Integer Dim j As Integer DimmAs Long Dim sum As Long m=1 If n=i0 Or n=12 Then′通过判断n的值,可确定使用什么操作 For i=2 To n m=i * m Next i′求n的阶来 Texti.Text=m End If sum=0 If n=2000 Or n=i000 Then For j=i To n sum=sum+j Next j′求1到n的和 Textl.Text=sum End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
本题的语句比较多,先看一下程序实现的过程,通过单选按钮决定是进行阶乘还是累加运算,并确定4个菜单项的Enabled属性,在菜单项的Click事件过程中,设置n的值,运用If判断语句判断n值,进行累加或阶乘运算,然后通过文件编辑实现存盘操作。
转载请注明原文地址:https://kaotiyun.com/show/sATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Commandl的命令按钮,要求当执行
关于MDI窗体下列说法正确的是()。
下列关于线性链表的描述中,正确的是()。Ⅰ、只含有一个指针域来存放下一个元素地址Ⅱ、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)Ⅲ、结点由两部分组成:数据域和指针域。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
已知文本框的ScrollBars属性设置为3,却看不到任何效果,原因是()。
下列可以激活属性窗口的操作是()。
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load() Show Text1.Text="" Text2.Text="" Text1.SetFocusEndS
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()CD1.ShowOpenOpen
随机试题
慢性宫颈炎的主要病理改变有哪些?
患者女,70岁。既往有多年肺不舒服,因骨折住院随后高烧,胸片显示肺部发生严重感染,外周血白细胞计数降低,血涂片发现有明显的核左移及毒性改变,该患者
内种皮为1列栅状黄棕色石细胞,内含硅质块的药材是( )。
在某单斜构选地区,剖面方向与岩层走向垂直,煤层倾向与地面坡向相同,剖面上煤头露头的出露宽度为16.5m,煤层倾角为45°,地面坡角为30°,在煤层露头下方不远处的钻孔中,煤层岩芯的长度为6.04m(假设岩芯采取率为100%).()的说法最符合露头与
在息税前利润大于零的情况下,如果企业一定期间内的固定性经营成本和固定性资本成本均不为零,则由上述因素共同作用而导致的杠杆效应属于()。
现代发现学习公认的倡导者是()。
下列选项中,属于汉朝基本法律框架的法律有()。
计算二重积分I=dxdy,其中D是由y=1,y=x2及x=0所围区域(如图4.33).
有以下程序:#include<stdio.h>doublefun(doublea){doublex;x=a—(int)a;returnx;}main(){doublea=3.1415;printf(″%f\n″,fun(a
下列可以设置为索引的字段是()。
最新回复
(
0
)