在考生文件夹中有工程文件sj4.vbp及其窗体文件sj4.frm,该程序是不完整的。 在窗体上有四个复选框,名称分别为Check1、Check2、Check3和Check4,标题分别为“足球”、“篮球”、“羽毛球”和“排球”。一个标签,名称为Label1,还有一个命令按钮,名称为Command1,标题为“选择结果”。要求程序运行后,如果选中某个复选框,当单击“选择结果”命令按钮时,则显示相应的信息。例如,如果选中“足球”和“羽毛球”复选框,单击“选择结果”命令按钮后,在标签上显示“我喜欢的运动是足球羽毛球”,如图8—4所示。注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“”’号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
第1题:
在考生文件夹中有工程文件execise71.vbp及窗体文件execise71.tim。在名为Form1的窗体中有两个命令按钮,名称分别是Cmd1和Cmd2,标题分别是“修改图标”和“修改标题”。要求程序运行后,单击“修改图标”命令按钮,则将窗体标题栏中的图标换为图标文件pic1.ico(该文件在考生文件夹中);单击“修改标题”命令按钮,则将窗体标题修改为“这是窗体”,如下图所示。
本程序不完整,请补充完整,并能正确运行。
要求:
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
第2题:
在考生文件夹中有文件execise66.vbp及其窗体文件execise66.frm。在名为Form1的窗体上建立一个名称为Text1的文本框;两个复选框,名称分别为Chk1和Chk2,标题分别为“足球协会”和“网络协会”。
要求程序运行后,如果只选中“足球协会”并单击窗体,则在文本框中显示“报名参加足球协会” (如下图所示);如果只选中“网络协会”,然后单击窗体,则在文本框中显示“报名参加网络协会”:如果同时选中“足球协会”和“网络协会”,单击窗体,则在文本框中显示“报名参加足球协会和网络协会”;如果“足球协会”和“网络协会”都不选取,在单击窗体后,则在文本框中什么都不显示。
要求:
在有问号“?”的地方填入正确内容,然后删除“?”及所有注释符“'”,但不得修改其他部分。保存时不得改变文件名和文件夹。
第3题:
在考生文件夹中有一个工程文件execise106.vbp及窗体文件execise106.frm。请在名为 Form1的窗体上绘制两个框架(如下图所示),其名称分别为Frame1和Frame2,标题分别为“交通工具”和“到达目标”。在Fmme1中绘制两个单选按钮,名称分别为opt1和 opt2,标题分别为“飞机”和“火车”。在Frame2中绘制两个单选按钮,名称分别为Opt3和opt4,标题分别为“杭州”和“昆明”。绘制一个图片框,其名称为Pic1,宽度为2000,高度为5000。
注意:
不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的“关闭”按钮。最后按原文件名并在原文件夹中保存修改文件。
第4题:
在考生文件夹中有文件execise74.vbp及其窗体文件execise74.frm。在名为Form1的窗体上有一个名称为Text1的文本框;两个复选框,名称分别为Chk1和Chk2,标题分别为“羽毛球班”和“足球班”:一个名称为Cmd1、标题为“确定”的命令按钮。要求程序运行后,如果只选中“羽毛球班”,单击“确定”命令按钮,则在文本框中显示: “报名参加羽毛球班”;如果只选中“足球班”,单击“确定?命令按钮,则在文
本框中显示: “报名参加足球班”;如果同时选中“羽毛球班”和“足球班”,单击“确定”命令按钮,则在文本框中显示:“报名参加羽毛球班和足球班” (如下图所示);如果“羽毛球班”和“足球班”都不选,单击“确定”命令按钮,则在文本框中什么都不显示。
本程序不完整,请补充完整,并能正确运行。
要求:
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
第5题:
在名称为Forml的窗体上建立两个主菜单,其标题分别为“文件”和“编辑”,名称分别为vbFile和VbEdit,在“文件”菜单下有三个子菜单项,标题分别为“打开”、“保存”和“关闭”,名称分别为vbOpen、vbSave和vbClose。要求程序运行后,如果选中“文件”下的某个菜单项,则通过MsgBox对话框显示该菜单项的标题,如图6-3所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sja.vbp。
标签 |
名 称 |
内缩 |
文件 |
vbFile |
无 |
打开 |
vbOpen |
一位 |
保存 |
vbSave |
一位 |
关闭 |
vbClose |
一位 |
编辑 |
vbEdit |
无 |
单击“确定”按钮,菜单建立完成后,进入代码窗口编写以下代码:
Private Sub vbClose_Click关闭命令调用的函数
MsgBox("关闭")
End Sub
Private Sub vbOpen—Click 打开命令调用的函数
MsgBox("打开")
End Sub
Private Sub vbSave_Click 保存命令调用的函数
MsgBox("保存")
End Sub
单击按钮运行程序,并按要求保存。