- 1、本文档共7页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
全国计算机等级考试二级VB上机试题及答案(一)
全国计算机等级考试二级VB上机试题及答案(一)
基本操作(2小题,每题15分,共30分)
****************************************************************
VB应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称Text1的文本框,其高、宽分别为400、2000。请在属性框中设置适当的属性以满足以下要求:1)Text1的字体为黑体,字号为四号;2)窗体的标题为输入,不显示最大化和最小化按钮。运行后的窗体如图所示。*注意:存盘时必须存放在考生文件夹下,工程文件名为stj1.vbp,窗体文件名为stj1.frm。(2)在名称为Form1的窗体中建立一个名为Command1、标题为显示的命令按钮。要求程序运行后,如果单击显示按钮,则执行语句Form1.Print显示;如果单击窗体,则执行语句Form1.Cls。程序运行时的界面如图所示。*注意:保存时必须存放在考生文件夹下,窗体文件名为stj2.frm。工程文件名为stj2.vbp。
参考答案与分析
(1)【解析】本题主要考查窗体属性的设置。窗体的Caption属性决定其标题,MaxButton和 MinButton决定了窗体显示时的表现形式,如果为True,则表示可以将窗体最大化或最小化,若为False,则不可最大化或最小化。文本框中的字体可以通过Font属性窗口设置,可以设置其字体,字号,字形,是否有下划线,删除线等。【答案】步骤1:启动VB,新建工程文件。步骤2:双击工具箱中的文本框控件,在窗体上画一个文本框,Name属性为Text1,Text属性设为空。Font属性中设置字体为黑体,字号为四号;将Form1的Caption属性设为输入,MaxBotton与MinBotton属性均设为False。步骤3:通过双击窗口进入代码编辑窗口编写代码如下:1 Private Sub Form_Load()2 Text1.Text = 计算机考试3 End Sub步骤4:保存。程序设计完成经调试无误后进行存盘。执行文件菜单中的保存工程命令,打开文件另存为对话框,窗体文件名为Stj1.form,单击保存按钮。然后在紧接着出现的工程另存为对话框中选择工程文件名为Stj1.vbp,单击保存按钮。(2)【解析】本题主要考查Print方法用于在图片框和窗体中显示内容。格式为:对象名.print 待显示的内容;Cls方法用于在图片框和窗体中清除内容,格式为:对象名.Cls【答案】步骤1:启动VB,新建工程文件。步骤2:在窗体上画一按钮,将其Name属性设置为Command1,Caption属性为显示。步骤3:编辑源代码:1 Private Sub Command1_Click()2 Form1.Print 显示3 End Sub4 Private Sub Form_click()5 Form1.Cls6 End Sub步骤4:保存。程序设计完成经调试无误后进行存盘。以Stj2.vbp和sjt2.frm进行保存。
简单操作(2小题,每题20分,共40分)
****************************************************************
VB应用程序(包括界面和代码)。
(1)在窗体上建立一个名称为Text1的文本框,建立一个名称为Calculate,标题为计算的命令按钮(如图所示)。要求程序运行后,如果单击计算按钮,则求出100~200之间所有可以被3整除的数的总和,在文本框中显示出来,并把结果存入考生文件夹下的out003.txt文件中。注意,在考生的文件夹下有一个名为stj3.vbp的工程文件,其中提供了保存文件的过程putdata,考生可以直接用。*注意:保存时必须存放在考生文件夹下,窗体文件名为stj3.frm。工程文件名为stj3.vbp。已给的的程序代码为:1 Option Explicit2 Sub putdata(t_FileName As String, t_Str As Variant)3 Dim sFile As String4 sFile = \ t_FileName5 Open App.Path sFile For Output As #16 Print #1, t_Str7 Close #18 End Sub(2)在考生文件夹中有工程文件stj4.vbp及其窗体文件 stj4.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(),但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下:在窗体上有一个名称为Text1的
文档评论(0)