发布时间 : 星期四 文章全国计算机等级考试二级VB上机试题及答案(十一)更新完毕开始阅读73c8cd832a160b4e767f5acfa1c7aa00b42a9d37
全国计算机等级考试二级VB上机试题及答案(十一)
全国计算机等级考试二级VB上机试题及答案(十一)
基本操作(2小题,每题15分,共30分) ****************************************************************
请根据以下各小题的要求设计VB应用程序(包括界面和代码)。
请根据以下各个小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个列表框,其名称为List1,通过属性窗口向列表框中输入9个项目,分别为10、20、30、40、50、60、70、80、90;画一个文本框,其名称为Hscroll,Min属性和Max分别为0和100,如图所示,编写适当的事件过程。程序运行后,如果单击列表框中的某个项目内容,并把滚动条的滚动框移动到相应的位置,如图所示。
要求:不得使用任何变量。
(2)在名称为Form1的窗体中画一个图像框,名称为Image1,其高、宽分别为1800、4500,通过属性窗口把考生文件夹下的图像文件smile.bmp装入图像框;再画一个命令按钮,名称为Cmd1,标题为\放大\。 请编写适当事件过程,程序运行后,单击\放大\按钮,则把图像框的高度、宽度均增加100,同时图像也随之自动放大。 注意:程序中不得使用任何变量。
程序运行时的界面如图所示。
****************************************************************
参考答案与分析
(1)【解析】
滚动条的属性设置:Min--最大值属性。默认值为32767;Max--最小值属性,默认值为0;Value--返回或设置滚动条的当前位置的值,返回直介于Max 和Man属性之间的值,包括这两个值。
要实现滚动条的返回值与List的设置值同步变化,在两者之间建立等式关系即可。而Text属性对应的变量类型为字符串,所以这里用了一个转化函数Val()来实现。Val(S)函数将字符串转化为数值。与之对应的将数值转化为字符串的函数Str(N)。 【答案】
第一步:启动VB,新建一个工程文件。
第二步:在窗体上画一个文本框,文本框的Name属性为Text1,Text属性空,再在窗体上画一个水平滚动条Max为100,Min为0,Name为HScroll1,再画一个列表框List1,在List属性中输入\、20、30、40、50、60、70、80、90\。 第三步:编写程序代码:
1 Private Sub List1_Click() 2 Text1.Text = List1.Text
3 HScroll1.Value = Val(List1.Text) 4 End Sub
第四步:调试并运行程序,运行正确后按要求保存。 (2)【解析】
本题主要考查了图像框的Stretch属性以及控制其大小的Height、Width属性。