(安徽省及国家计算机二级VB模拟题解惑答疑2011考试必看.docVIP

VB上机试题解惑答疑 四、基本操作题 1．在考生文件夹中，完成以下要求： （1）启动工程文件Sjt.Vbp，将该工程文件的工程名称改为“Spks”，并将该工程中的窗体文件Sjt.frm的窗体名称改为“vbbc”，窗体的标题为“二级VB考试”。 （2）在窗体上增加以下控件：定时器Timer1，时间间隔值为10；图片框Picture1；标签Label1放置在图片框中，标签的大小自动调整；标签Label2的标题为“快”；文本框Text1放置在图片框下方；水平滚动条HScroll1，最小值为0,最大值为100 。 （3）按如下要求编写代码： 文本框中输入的字符自动显示为标签的标题；标签自动向左移动，移出图片框后又从右边进入（提示：编程使得当标签的Left-1000时，重置Left＝10000）；拖动水平滚动条时，将调整移动的速度。 （4）请先调试、运行，然后将工程、窗体保存。 参考程序代码如下： Private Sub HScroll1_Change() Timer1.Interval = HScroll1.Value ‘水平滚动条的值越小，timer事件执行间隔越小，标签运动越快 End Sub Private Sub Text1_Change() Label1.Caption = Text1.Text End Sub Private Sub Timer1_Timer() Label1.Left = Label1.Left – 100 ‘ 标签距离picture1左边界的距离减少100单位 If Label1.Left -1000 Then Label1.Left = 10000 End Sub 2．在考生文件夹中，完成以下要求： （1）启动工程文件Sjt.Vbp，将该工程文件的工程名称改为“Spks”，并将该工程中的窗体文件Sjt.frm的窗体名称改为“vbbc”。 Label1标题为“姓名：”，Label2标题为“籍贯：”， Label3标题为空；一个框架Frame1标题为“性别”；两个单选按钮在框架Frame1中，Option1标题为“男”,Style属性为1且为选中状态，Option2标题为“女”，Style属性为1；一个文本框Text1内容为空，且Tabindex属性值为0；一个列表框List1；一个命令按钮Command1，标题为“确定”。（以上操作在属性窗口中完成） xb，jg；在窗体的装载事件中完成：列表框添加三项内容：“北京”，“上海”，“合肥”，且“北京”选项默认被选中，xb变量的初始值为“男”。 Option1时，为变量xb赋值为“男”；选中Option2时，为变量xb赋值为“女”；选中列表框的某一项时，把选中的内容赋值给jg (要求在列表框的Click事件中实现)；单击按钮Command1时，在Label3中顺次显示姓名（Text1中的内容），籍贯（变量jg的值）,性别（变量xb的值）。 (5)请先调试、运行，然后将工程、窗体保存。 参考程序如下： Public jg, xb Private Sub Command1_Click() Label3.Caption = Text1.Text ： jg , xb End Sub Private Sub Form_Load() List1.AddItem 北京 List1.AddItem 上海 List1.AddItem 合肥 xb = 男 List1.ListIndex = 0 使得运行时列表框中被选中的初始值为“北京” End Sub Private Sub List1_Click() jg = List1.Text End Sub Private Sub Option1_Click() xb = 男 End Sub Private Sub Option2_Click() xb = 女 End Sub 3．在考生文件夹中，完成以下要求： (1)启动工程文件Sjt.Vbp，将该工程文件的工程名称改为“Spks”，并将该工程中的窗体文件Sjt.frm的窗体名称改为“vbbc”。 (2)Drive1；一个目录列表框Dir1；一个文件列表框File1，自动过滤出扩展名为bmp和jpg的图形文件；一个图像框Image1，其中的图片自动匹配图像框的大小。（以上操作在属性窗口中完成） (3)bmp和jpg的图形文件；当单击文件列表框中的某个图形文件时，图像框中显示出该图片（可为机器上任意扩展名为bmp和jpg的图形文件）。 (4)请先调试、运行，然后将工程、窗体保存。 参考程序如下： Private Sub Dir1_Change() File1.Path = Dir1.