Private Sub Form_Load()
List1.AddItem "北京"
List1.AddItem "上海"
List1.AddItem "河北"
End Sub
Private Sub List ______()
LabeCaption = ______
End Sub
第1题
,字号大小为四号;建立4个复选框,名称分别为Chk1、Chk2、 Chk3和Chk4,标题分别为“英语”、“数学”、 “政治”和“体育”,字体大小均为16,其中“体育”被禁用,如下图所示。
注意:
文件必须存放在考生文件夹中,窗体文件名为execise4.frm,工程文件名为execise4.vbp。
第4题
为“选项1”、“选项2”、“选项3”和“选项4”,其下标分别为1, 2,3,4。默认选择为“选项3”。运行结果如图10所示。程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为ylc2.vbp,窗体文件名为ylc2.frm。
第5题
注意:下面出现的“考生文件夹”均为C:\wexam\25160002。
(1) 在名称为Form1的窗体中画一个名称为L1的标签,其标题为“0”,BorderStyle属性为“再添加一个名称为Timer1的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图27-3所示的是程序刚启动时的情况。程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
(2)在考生文件夹下有一个工程文件sjt4.vbp,要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。而如果单击“显示”按钮,则在窗体上输出所有选中的列表项,如图27-4所示。
要求:修改列表框的适当属性,使得运行时可以多选,并去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不得修改程序中的其他部分。最后把修改后的程序以原来的文件名存盘。
第6题
中填充不同的图案,请填写程序的空白处,使程序完整。
Private Sub Option1_Click(______)
Dim H, W
Picture1.Cls
Picture1.FillStyle. =______
W = Picture1.ScaleWidth/2
H = Picture1.ScaleHeight/2
Picture1.Circle (W, H), W/2
End Sub
第7题
个标签Lab1。请绘制一个单选按钮数组,名为Opt1,含3个单选按钮,它们的Index属性分别为0、1、2,标题依次为“汽车”、“自行车”和“步行”;再绘制一个名称为Text1的文本框。
窗体文件中已经给出了Opt1的Click事件过程,但不完整,要求去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使得在运行时单击“汽车”或“自行车”单选按钮时,在Text1中显示“我坐汽车去”或“我骑自行车去”,单击“步行”单选按钮时,在Text1中显示“我步行去”。运行结果如下图所示。
注意:
不能修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
第8题
称分别为vbFile和VbEdit;在“编辑”菜单下有第二级菜单,含有3个菜单项,标题分别为“剪切”、“复制”和“粘贴”,名称分别为vbCut、VbCopy和vbPaste。其中“剪切”菜单项设置为无效(如下图所示)。
注意:
文件必须存放在考生文件夹中。工程文件名为execise48.vbp,窗体文件名为 execise48.frm。
第9题
1的Change事件过程,使得在运行时,在文本框中每输入一个字符,就在图片框中输出一行文本框中的完整内容。运行时的窗体如下图所示。
注意:
程序中不能使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise68.vbp,窗体文件名为execise68.frm。
第10题
经绘制出所有控件,如下图所示。在运行时,如果单击Move按钮,则窗体上的汽车图标每0.1秒向右移动一次(初始状态下不移动);如果单击Stop按钮,则停止移动。
要求:
(1)设置适当控件的适当属性,使得汽车图标每0.1秒向右移动一次,而初始状态下不移动。
(2)请去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容。
(3)为两个命令按钮编写适当的事件过程。最后以原文件名保存。
注意:
不得修改已经给出的程序。编写的事件过程中不能使用变量,每个事件过程中只能有一条语句。
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!