首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sj3.vbp,两个窗体文件,文件名分别为sj31.frm和sj32.frm。此工程实现的功能是,在运行时只显示名为Form2的窗体,单击Form2上的Commandl按钮,则弹出名为Forml的窗体;单击Forml上的C
(1)在考生文件夹下有一个工程文件sj3.vbp,两个窗体文件,文件名分别为sj31.frm和sj32.frm。此工程实现的功能是,在运行时只显示名为Form2的窗体,单击Form2上的Commandl按钮,则弹出名为Forml的窗体;单击Forml上的C
admin
2009-03-26
31
问题
(1)在考生文件夹下有一个工程文件sj3.vbp,两个窗体文件,文件名分别为sj31.frm和sj32.frm。此工程实现的功能是,在运行时只显示名为Form2的窗体,单击Form2上的Commandl按钮,则弹出名为Forml的窗体;单击Forml上的Commandl按钮,则Forml的窗体关闭。这个程序并不完整,要求:
把Form2设为启动窗体;把Form2上按钮的标题改为“打开”,把Forml上按钮的标题改为“关闭”。去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件存盘。程序正确运行后的界面如图48—3所示。
注意:不得改变工程文件名和窗体文件名,仍按原文件名存盘。
(2)在考生文件夹下有一个工程文件sj4.vbp,它的功能是在文本框中输入一个整数,单击“移动”按钮后,如果输入的数大于0,滚动条中的滚动块向下移动到与该数相等的刻度,但如果输入的值大于滚动条的最大值,则不移动,并且显示“数值超过最大值”;如果输入的是负数,滚动条中的滚动块向上移动到与该数相等的刻度,但如果超过了滚动条的最小值,则不移动,并且显示“数值小于最小值”,如图48—4所示。
注意:去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的程序以原来的文件名存盘。
选项
答案
(1)根据题意,在工程窗口中单击右键,选择“添加窗体”命令,或选择“工程”→“添加窗体”命令添加一个Form,名称为Form2,然后分别在Forml和Form2中添加一个Command,名称都为Commandl、Caption属性分别为“关闭”和“打开”,设置完成后,双击Forml中的关闭按钮,编写如下代码: Private Sub Commandl_Click()
Unload Me
’关闭forml End Sub 双击Form2的打开按钮,编写如下代码: Private Sub Commandl_Click()
Forml.Show
’显示Forml End Sub 单击[*]按钮运行程序,并按要求保存。 (2)滚动条能表示的最大值由Max属性设置,最小值由Min属性设置。滚动条的当前值由Value属性设置。 根据题意,将一个垂直滚动条控件、一个命令按钮、一个文本框控件和一个Label控件添加到窗体中,垂直滚动条的名称为VScrolll、Max属性为500、Min属性为100,命令按钮的名称为Commandl、Caption属性为“移动”,文本框的名称为Textl、Text属性为空,标签的名称为Labell、Caption属性为空。双击Commandl进入代码编写窗口,补充如下参考代码: Private Sub Commandl_Click() Dim i As Integer i=Val(Textl.
Text
) ’将Textl中的字符串转换成数值 If(VScrolll.Value+i>VScrolll.
Max
)Then’如果大于最大值 Labell.Caption "数值超过最大值" ’移动后数值如果大于最大值 Elself VScrolll.Value+i
Min Then Labell.Caption="数值小于最小值" ’移动后数值如果小于最小值 Else VScrolll.Value=VScrolll.
Value
+i’满足条件则移动 Labell.Caption="" End If End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/uV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库设计有两种方法,它们是()。
已知:int[]a=newint[100];在下列给出的数组元素中,非法的是()。
关系数据库管理系统能实现的专门关系运算包括选择、连接和【】。
Applet的运行过程要经历4个步骤,其中______不是运行步骤。()
下面______组件可以不添加到容器中。
JDBC中要显式地关闭连接的命令是()
用AWT组件实现单选按钮功能,需要使用______组件?()
为使Java程序独立于平台,Java虚拟机把字节码与各个操作系统及硬件():
int类型的取值范围为()。
java.lang.ThreadGroup类的作用为()。
随机试题
实验发现机体存在有自身抗体,以下阐述哪一项错误
汉代传《诗》有鲁、齐、韩、毛四家,今日通行的是()
林某,男,38岁。长途奔于烈日之下,中暑身热,体温40℃,汗出,烦渴引饮,间有谵语,大便味臭,小便色赤,脉大而虚,舌苔黄燥。试写出辩证分析、病名、证型、治法、方药及药物剂量。
濡脉与以下哪些脉象相似
下列各项中,除哪项外,均与肛隐窝炎有关:
新起腹泻,大便黄褐而臭者多属大便清稀,完谷不化或如鸭溏者多属
某歌舞厅原为评剧团排练厅,后改建成歌舞厅(审批定员为140人),取得文化经营许可证和工商营业执照后对外营业,为增加营业面积,又进行了扩建,并租赁给个人承包经营。个人承包经营者在未办理建审手续的情况下对该歌舞厅进行了装修:大厅吊顶采用胶合板、贴顶纸,墙壁为化
样本值x1,x2,…,xn,每个值增加5倍,则方差是原来的________倍。
Readthefollowingtextanddecidewhichanswerbestfitseachspace.Forquestions26-45,markoneletterA,B,CorDony
A、Theytrytohelpcancerpatientsovercomefright.B、Theyhelpdoctorsbecomesensitivetopatients’feelings.C、Theyhavebeen
最新回复
(
0
)