全国计算机等级测验二级vb上机试题及答案(十一).docxVIP

全国计算机等级测验二级 机试题及答案（十一） VB上 作者: 日期: 全国计算机等级考试二级 VB上机试题及答案（十一） 圍基本操作（2小题，每题15分，共30分） **************************************************************** 请根据以下各小题的要求设计 VB应用程序（包括界面和代码）。 请根据以下各个小题的要求设计 Visual Basic 应用程序（包括界面和代码）。 （1）在名称为Forml的窗体上画一个列表框，其名称为 Listl，通过属性窗口向 列表框中输入 9个项目，分别为 10、20、30、40、50、60、70、80、90;画一个 文本框，其名称为 Hscroll ，Min属性和Max分别为0和100，如图所示，编写适 当的事件过程。程序运行后，如果单击列表框中的某个项目内容，并把滚动条的滚 动框移动到相应的位置，如图所示。 要求：不得使用任何变量。 （2）在名称为Form1的窗体中画一个图像框，名称为Image1，其高、宽分别为1800、 4500，通过属性窗口把考生文件夹下的图像文件 smile.bmp装入图像框；再画一个 命令按钮，名称为 Cmd1标题为”放大”。 请编写适当事件过程，程序运行后，单击 ”放大按钮，则把图像框的高度、宽度均 增加100，同时图像也随之自动放大。 注意：程序中不得使用任何变量。 程序运行时的界面如图所示。 **************************************************************** 参考答案与分析 【解析】 滚动条的属性设置：Min--最大值属性。默认值为32767; Max--最小值属性，默 认值为0； Value--返回或设置滚动条的当前位置的值，返回直介于 Max和Man 属性之间的值，包括这两个值。 要实现滚动条的返回值与List的设置值同步变化，在两者之间建立等式关系即 可。而Text属性对应的变量类型为字符串，所以这里用了一个转化函数 Vai() 来实现。Val(S)函数将字符串转化为数值。与之对应的将数值转化为字符串的函 数 Str(N)。 【答案】 第一步：启动VB,新建一个工程文件。 第二步：在窗体上画一个文本框，文本框的 Namei性为Text1，Text属性空， 再在窗体上画一个水平滚动条 Max为100，Min为0，Name为HScrolH，再画一 个列表框 List1，在 List 属性中输入10、20、30、40、50、60、70、80、90。 第三步：编写程序代码： Private Sub List1_Click() Text1.Text = List1.Text HScroll1.Value = Val(List1.Text) End Sub 第四步：调试并运行程序，运行正确后按要求保存。 【解析】 本题主要考查了图像框的 Stretch属性以及控制其大小的Height、Width属性。 Height、Width属性与其它控件类似，设置相应的值即可动态的改变图像框的大 小，例如题目要求单击放大按钮要使得图像框的宽度和高度均增加 100,故在 Cmd1的Click事件中改变Image的Height和 Width，在原先的基础上加上 100。 另外，题目中要求固定图片框的大小，即不能由于图片的大小而改变图片框的大 小，而且改变图像框的大小后，其中加载的图片也要自动改变大小， 所以必须将 Image的Stretch属性设置为True。 【答案】 第一步：启动VB,新建一个工程文件。 第二步：在窗体中画一个图像框，名称为Imagel,设置Height属性1800, Width 属性1500，Stretch 属性为True，在Picture 属性中装入文件夹下的图像文件 smile.bmp，再画一个命令按钮，NamelS性为Cmd1 Caption属性为放大。 第三步：编辑代码： Private Sub Cmd1_Click() Image1.Height = Image1.Height + 100 Image1.Width = Image1.Width + 100 End Sub 第四步：调试并运行程序，运行正确后按要求保存。 圍简单操作(2小题，每题20分，共40分) **************************************************************** 请根据以下各小题的要求设计 VB应用程序(包括界面和代码)。 (1)在考生文件夹下有一个工程文件 stj3.vbp ，及其窗体文件stj3.frm ，程序运 行时，如果用鼠标左键按住窗体，并在其上移动，则窗体上显示 ”您按下了鼠标的