首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在窗体上绘制一个名称为Text1的文本框和一个名称为cmd1、标题为“计算”的命令按钮,如图4—3所示。程序运行后,单击“计算”命令按钮,通过在对话框输入整数12,放入整型变量a中,然后计算a!(提示:运算结果应放入Long型变量中),在文本框中显示
(1)在窗体上绘制一个名称为Text1的文本框和一个名称为cmd1、标题为“计算”的命令按钮,如图4—3所示。程序运行后,单击“计算”命令按钮,通过在对话框输入整数12,放入整型变量a中,然后计算a!(提示:运算结果应放入Long型变量中),在文本框中显示
admin
2009-03-26
73
问题
(1)在窗体上绘制一个名称为Text1的文本框和一个名称为cmd1、标题为“计算”的命令按钮,如图4—3所示。程序运行后,单击“计算”命令按钮,通过在对话框输入整数12,放入整型变量a中,然后计算a!(提示:运算结果应放入Long型变量中),在文本框中显示结果,如图4—4所示,并把结果存入文件out.txt中。考生文件夹中有一个标准模块mode.bas,该模块中提供了保存文件的过程putdata,考生可以直接调用。
注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3.vbp。
(2)在考生文件夹中有一个工程文件sj4.vbp及窗体文件sj4.frm。在名为Form1的窗体上有两个容器,其中一个容器中有两个单选按钮,另一个容器中有两个复选框,窗体上还有一个标题为“确定”的命令按钮和一个初始内容为空的文本框。所有控件已经全部画出。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,则对文本框中的文字进行相应的设詈,如图4—5所示。
窗体上的控件已经绘制出,但没有给出主要程序内容,请编写适当的事件过程,完成上述功能。
注意:不能修改已经给出的程序部分和已有的控件;在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击“确定”按钮;必须通过单击窗体右上角的“关闭”按钮结束程序,否则无成绩。最后,按原文件名并在原文件夹中保存修改后的文件。
选项
答案
(1)在窗体上建好控件后,先设置控件属性,再编写事件过程和调试程序,并使其符合题目要求。当运行程序后,所弹出的对话框是通过调用函数InputBox来实现(通过Visual Basic系统本身提供的)。本题主要是考查循环语句的应用。计算一个数值的阶乘时使用了for循环,最后调用了所给模块中的过程将结果进行保存。 ①建立界面并设置控件属性。程序中用到的控件及其属性见下表: [*] ②声明存储运算结果的Long型变量。在编写程序代码时要注意变量范围的设定,题目要求将计算结果存入Long变量中,所以把最后放入文本框内的变量设置为长整型。(例如:Dim temp As Long) ③打开工程资源管理器,在其空白处右键添加模块mode.bas(此文件已在考生文件夹里),模块代码如下: Option Explicit Sub putdata(t_FileName As String,T_Str As Variant) Dim sFile A8 String sFile="\"&t_FileName ()pen App.Path&.sFile For Output As#1 Print#1,T_Str Close#1 End Sub ④打开工程资源管理器,右击窗体,选择查看代码项,在弹出的代码窗口输人代码如下: Private Sub Cmdl Click() Dim a AS Integer Dim temp As Long Dim i AS Integer a=Val(InputBox("请输入")) temp=1 For i=1 To Val(a) temp=temp*i Next i Textl.Text=temp putdata"out.txt",Textl.Text End Sub ⑤调试并运行程序。 ⑥按题目要求存盘。 (2)①打开题目所给工程文件。 ②打开代码窗口输入以下代码: Private Sub Cmdl Click() IfOptl.Value=True Then Textl.Font="宋体" Else Textl.Font="隶书" End If If Chkl.Value=l Then Textl.FontUnderline=Ture Else Textl.FontUnderline=False End If If Chk2.Value=1 Then Textl.FontItalic=True Else Textl.FontItalic=False End If End Sub ③按要求保存文件即完成本题。
解析
转载请注明原文地址:https://kaotiyun.com/show/mV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在长度为n的有序线性表中进行二分查找,需要的比较次数为【】。
用synchronized标识的共享数据必须是【】。
在Java中,能实现多重继承效果的方式是()。
在软件生存周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是
下列______包封装抽象窗口工具包,提供管理用户图形界面功能。()
如果创建的一个子类覆盖一个public方法,则对该方法可以使用哪些修饰符()
数据的逻辑结构是指()。
下面______组件可以不添加到容器中。
子程序通常分为两类:【】和函数,前者是命令的抽象,后者是为了求值。
int类型的取值范围为()。
随机试题
合金渗碳钢是典型的表面强化钢,其含碳量为()。
A.胚胎B.有生胎儿C.胎儿D.早产儿E.足月儿
A.氯喹B.氨苯砜C.沙利度胺D.烟酰胺E.钙剂贫血
订立建设工程合同必须严格地按照一定程序进行。其订立过程一般分为()四个步骤。
细水雾灭火系统的()的设置是为了防止细水雾喷头堵塞,影响灭火效果。
平均指数若是综合指数的变形,在编制时应遵循的一般规则是()。
甲公司(居民企业)为国家重点扶持的高新技术企业,2019年年度有关财务收支情况如下:(1)销售商品收入5000万元,出售一台设备收入20万元,转让一宗土地使用权收入300万元,从其直接投资的未上市居民企业分回股息收益80万元;(2)税收滞纳金5万元,赞
注册会计师应对舞弊导致的认定层次重大错报风险时,应当考虑的方式包括()。
有关海啸,下列说法错误的是()。
集束炸弹(又称子母弹)
最新回复
(
0
)