首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个圆和一条直线(直线的名称为Linel)构成一个钟表的图案;有两个命令按钮,名称分别为Command1、Command2,标题分别为“开始”、“停止”;还有一个名为Timerl的计时器。程序运行时
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个圆和一条直线(直线的名称为Linel)构成一个钟表的图案;有两个命令按钮,名称分别为Command1、Command2,标题分别为“开始”、“停止”;还有一个名为Timerl的计时器。程序运行时
admin
2017-09-22
38
问题
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个圆和一条直线(直线的名称为Linel)构成一个钟表的图案;有两个命令按钮,名称分别为Command1、Command2,标题分别为“开始”、“停止”;还有一个名为Timerl的计时器。程序运行时,钟表指针不动,单击“开始”按钮,则钟表上的指针(即Linel)开始顺时针旋转(每秒转6°,一分钟转一圈);单击“停止”按钮,则指针停止旋转。运行时的窗体如图3.114所示。请设置计时器的适当属性,使得每秒激活计时器的Timer事件一次,并编写两个按钮的Click事件过程。
文件中已经给出了所有控件和部分程序,不得修改已有程序和其他控件的属性:编写的事件过程中不得使用变量,且只能写一条语句。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上有两个文本框、三个单选按钮和一个命令按钮。运行时,在Text1中输入若干个大写和小写字母,并选中一个单选按钮,再单击“转换”按钮,则按选中的单选按钮的标题进行转换,结果放入Text2(如图3.115所示)。在给出的窗体文件中已经给出了全部控件,但程序不完整,要求:去掉程序中的注释符,把程序中的。“?”改为正确的内容。
注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在属性设置窗口,设置计时器的Interval属性值为1000,Enabled属性值为False。 步骤2:在代码编辑窗口,编写“开始”和“停止”按钮的单击事件过程。参考代码: Private Sub Command1_Click() Timerl.Enabled=True End Sub PriVate Sub Command2_Click() Timerl.Enabled=FalSe End Sub 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: a=Mid$(Text1.Text, k, 1) ch=ch+LCase(a) Text2=ch 步骤2:按要求将文件保存至考生文件夹中。
解析
(1)本题通过计时器的Timer事件来控制直线控件的位置,从而实现钟表上的指针旋转的功能。为使计时器的Timer事件每秒激活一次需将计时器的Interval属性值设置为1000;为使程序刚运行时钟表指针不动需将Enabled属性值设置为False。在“开始”按钮的单击事件过程中,通过设置计时器的Enabled属性值为Tme来启动计时器。在“停止"按钮的单击事件过程中,通过设置计时器的Enabled属性值为False来停止计时器。
(2)本题源程序是在命令按钮的单击事件过程中,用For循环语句和Mid函数逐一取出文本框Text1中的字符后,根据单选按钮的选择进行相应转换;当选择“大写转小写/小写转大写”时,如果是小写字母就用UCase函数转换为大写,如果是大写字母就用LCase函数转换为小写,如果不是字母就不用转换;当选择“全部大写”时,就用UCase函数将文本框中所有字母转换为大写;当选择“全部小写”时,就用LCase函数将文本框中所有字母转换为小写。将转换结果显示在文本框Text2中。
转载请注明原文地址:https://kaotiyun.com/show/fjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上有一个命令按钮,然后编写如下事件过程 PrivateSubCommand1_cickc() a=InputBox("enterthefirstinteger") b=InputBox("enterthesecon
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
为了使命令按钮(名称为Command1)右移200,应使用的语句是
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
在窗体上有一个命令按钮Command1,编写如下程序:PrivateSubCommand1_Click()Printpp1(3,7)EndSubPublicFunctionpp1(xAsSingle
窗体上有两个按钮,执行程序后按Cancel按钮的输出结果是______。PrivateSubCommandl_Click()Print“北京”;EndSubPrivateSubCommand2,_Click()
在窗体上画一个名称为Filel的文件列表框,并编写如下程序:PrivateSubFilel_DblClick()x=Shell(Filel.FileName,1)EndSub以下关于该程序的叙述中,错误的是__
设已经在菜单编辑器中设计了窗体的快捷菜单,某顶级菜单为al,且取消其"可见"属性。运行时,可以使快捷菜单的菜单项响应鼠标左键单击和右健单击的事件过程是
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是()。
随机试题
无风险报酬率和风险溢价是资本成本的两个主要构成成分,因此,()比较直观地反映了资本成本的组成内容。
急性化脓性骨髓炎抗生素治疗应选择下列哪项
埃希氏大肠杆菌的O抗原为
某患者患有痔疮10年以上,在药品零售药店购买肛泰栓剂来缓解症状。下列关于栓剂的基质说法正确是
维生素D缺乏性手足搐搦症发生喉痉挛多见于
( )就是使用合理的金融理论和数理统计理论,定量地对给定的资产所面临的市场风险给出全面的度量。
如果投资者投入的资本高于其在注册资本中占有的份额时,应当将高出部分计入营业外收入。()
薪酬管理最基础的工作是()。
近几十年来,人们发明了各种各样的药物来毒杀老鼠。可是人们发现,在一些老鼠经常出入的地方放置老鼠药的方法越来越没有效果。无论人们将药物添加到对于老鼠来说多么美味的食物之中,老鼠都会对这些送来的“美味”置之不理。根据这一现象。得到的可能解释是:老鼠的嗅觉异常灵
朋友也好,同事也好,大家层次不同,是很难沟通的。你可以偶尔降低自己的层次去________他,但常常要降低层次,那倒不如不要交这个朋友。你说的,他不明白;你在思考的事情,他从没思考过;你说东,他以为你说西;你想他做到一百分,他_________,只可以做到
最新回复
(
0
)