当前位置:首页 >> 其它课程 >>

算法与程序设计选修模块试题--VB

新课程信息技术选修模块试题:

算法与程序设计
[本卷适用于信息技术选修模块:VB 程序设计] 本试卷共 7 页,满分为 100 分,考试用时 90 分钟 。
注意事项:1、答题要求:第一卷选择题的答案用 2B 铅笔填在答题卡上,第二卷 的答案做在第二卷相应的位置上。 2、交卷说明:只须交答题卡和第二卷







一、单项选择题(1-40 题,每题 1 分,41-45 题,每题 2 分,共 50 分) 1、 VB 中创建的窗体文体的扩展名是 A. .vbw B..frm C. .bas D..vbp 2、 属性 caption 不可以为如下对象( )拥有。 A.窗体 B.文本框 C.标签 D.命令按钮 3、 窗体 form1 的宽度由如下属性表示( ) A.form1.left B.form1.top C.form1.height D.form1.width 4、 要把文本框 text1 中的文本设置为多行显示,应对 text1 的属性( )进行设置。 A.maxlength B.index C.multiline D.scrollbars 5、 执行如下语句组 dim k:k=k+1,变量 k 的值及类型是( ) A.0,整型 B.1,整型 C. “01” ,字符串型 D.”1”,可变类型 6、 下列关于算法的叙述不正确的是( ) A.算法是解决问题的有序步骤 B.算法具有确定性、可行性、有限性等基本特征 C.一个问题的算法都只有一种 D.常见的算法描述方法有自然语言、图示法、伪代码法等 7、 按 VB 规定,窗体等控件的属性划分为外观、位置、行为、字体、缩放、数据、DDE 杂项 等类别。属性 forecolor 应划分为( )类型。 A.字体 B.行为 C.位置 D.外观 8、 VB 中创建的工程文件的扩展名是( ) A..vbw B..frm C..bas D..vbp 9、 窗体等控件显示的文字字体大小属性由( )确定。 A.fontbold B.fontsize C.fontitalic D.fontunderline 10、 窗体等控件取得焦点的方法是( ) A.hide B.setfocus C.gotfocus D.set 11、 下列不属于窗体对象事件的是( ) A.Dblclick B.setfocus C.click D.load 12、 如下属性( )确定对象在窗体的位置。 A. right,bottom B. height,width C. top,left D. scaletop,scaleleft 13、 如下属性( )是对象在程序中的标识,创建对象时应由 VB 自动提供一个默认的名 称。
第 1 页 共 7 页

A.name(名称)属性 B.caption 属性 C.text 属性 D.index 属性 14、 假设有一个命令按钮的名称为 edit,又有语句:edit.caption=”编辑”。则在该 语句中,”edit”,”caption”、 “编辑”分别表示的是( ) A.对象名,事件,方法 B.属性、方法、事件 C.对象名、方法、事件 D.对象名、属性、属性值 0 15、 数学公式(x+y)sin30 的 VB 表达式为( ) A.(x+y)*sin(3.14159/6) B.x+ysin(30) C.(x+y)sin(3.14159/6) D.(x+y)sin(30) 16、 下列不属于 VB 常量的是( ) A.”name ” B.123.4 C.’111’ D.”11/16/99” 17、流程图中表示判断框的是( )。 A、矩形框 B、菱形框 C、圆形框 D、椭圆形框 18. 假定窗体的名称(Name 属性)为 Form1, 则把窗体的标题设置为 “VB.Test” 的语句为( ) A. Form1 = "VB Test" B.Caption ="VB Test" C.Form1.Text = "VB Test" A、标题 B、文本 C、名称 D.Form1.Name ="VB Test" D、颜色 19、在 VB 中,Name 属性表示的中文名为: 20、字符串“*******”的表达式正确的是( ) A.str(“*”,7) B.string(7,”*”) C.string(7, ‘*’) D.string(“*”,7) 21、VB 字符表达式“123abc”&“321”&12 的值是( ) A. “123abc32112” B. ”123abc321 12” C. ”12332112” D. ”123abc321” 22、表达式 Abs(-3.6)*sqr(100)的值是( )。 A、-360 B、360 C、-36 D、36 23、VB 表达式 mid(“english”,5)的值是( A.”lish” B.”ish” ) D.”i” ) C.”glish”

24、在 VB 中, “对象.Show”方法表示的含义为:( A、显示对象; B、隐藏对象 A.1046 B.10 25. VB 数值表达式 val(“5a23”)*2 的值是( C.”1046” B. TextBox 控件 D. CommandButton 控件 )

C、退出对象 D、清除文本和图形等对象。 D.”10” )

26.下列控件中可用于接受用户输入文本,又可用于显示文本的是( A.Label 控件 C. Timer 控件 ( )属性的值。 B.list C.name D.caption ) D.caption D.标签框 )属性。 D.BorderStyle

27、在 VB 中,若要改变一个标签(label)上显示的内容,应当在属性窗口中改变这个标签的 A.text A.enabled A.复选框 A.Name

28、以下选项中,不属于文本框(text)的属性是( B.visible B.框架 B.Caption C.name ) C.文本框 C.BackColor 29、下列控件中可自动设置滚动条的是(

30.如果要改变窗体的标题,需要设置窗体对象的(

第 2 页 共 7 页

31、以下选项中,不属于图片框(picture box)的属性是( A.align 32、通过以下( B.caption C.picture D.visible

)

)设置,可使得在向文本框中输入信息时显示“#” 。 B.将 name 属性值设置为“#” D.passwordchar 属性值设置为 true C.form_activate ) D.前景色 ) C.计时 C.tabstop D.显示时间 D.visible ) D.属性窗口 ) D.form_paint )

A.将 text 属性值设置为“#” C.将 passwordchar 属性值设置为“#” 33、下列事件中,最先执行的事件是( A.form_load A.高度 A.输入文本 36、如果将文本框的( A.locked B.form_initialize C.背景色

34.窗体的 BackColor 属性用于设置窗体的( B.宽度

35. Visual Basic 提供的标签控件(LABEL)可具有功能是( B.显示文本 B.multiline

)属性设置为 true,则运行时不能对文本框中的内容进行编辑。

37、双击窗体中的对象后,Visual Basic 将显示的窗口是( A.项目(工程)窗口 A.属性、事件、方法 B.工具箱 C.代码窗口

38.Visual Basic 是一种面向对象的程序设计语言,构成对象的三要素是( B.控件、属性、事件 C.窗体、控件、过程 D. 窗体、控件、模块 39、除框架外,能对单选按钮分组的控件是( ) A.窗体 A..ocx dim K,A,S K=1 S=20 A=2 Do while A<=S A=A*2 K=K+1 Loop A.4,16 dim K,S S=0 FOR K=1 TO 100 Step 12 If k<50 then S=S-K B.5,32 C.4,32 D.4,16 ) 42、下列程序段被执行后,变量 S 的值是( B.标签 B..c C.图形框 C..act D.图像框 )的独立文件。 D..bmp ) 40、每个 activex 控件都是扩展名为(

41、下列程序段被执行后,变量 K,A 的值分别是(

第 3 页 共 7 页

Else S=S+K End if next A.190 结果为( Dim a(5),b(5) For j=1 to 4 A(j)=3*j B(j)=a(j)*3 Next j Text1.text=b(j\2) End sub A.25 B.18 C.36 D.35 44、在窗体(name 属性为 form1)上画两个文本框(其 name 属性分别为 text1 和 text2)和一 个命令按钮(其 name 属性为 command1),然后编写如下两个事件过程: Private sub command1_click() A=text1.text+text2.text Print a End sub Private sub form_load() Text1.text=”” Text2.text=”” End sub 程序运行后,在第一个文本框和第 2 个文本框中分别输入 123 和 321,然后单击命令按 钮,则输出的结果为( ) A.444 B.321123 C.123321 D.132231 45、在窗体上画一个名称为 command1 的命令按钮,一个名称为 label1 的标签,然后编写如 下事件过程: private sub command1_click() s=0 for I=1 to 15 x=2*I-1 if x mod 3=0 then s=s+1 next I label1.caption=s end sub 程序运行后,单击命令按钮,则标签中显示的内容是( ) A.1 B.5 C.27 D.45 B.191 ) C.192 D.193 43、在窗体上画一个命令按钮,编写过程如下,运行后单击命令按钮,文本框中显示的输出 Private sub command1_click()

第 4 页 共 7 页

二、判断题(每题 1 分,共 20 分,将答案填在答题卡上,对的选 A,错的选 B) 46、由 VB 集成环境创建的应用程序有解释、编译两种执行方式。( ) 47、由 VB 集成环境创建应用程序有 3 个工作模式,它们分别是设计、运行、中断模式。 48、决定控件对象是否可用的属性是 visible,控件对象是否可见的属性是 enabled。( ) 49、一个工程文件“.vbp”描述了该工程包含的窗体文件等所有对象的内容。( ) 50、inputbox()函数的类型是字符串型。( ) 51、end 语句用于结束程序运行,在 VB 中不能有 end sub 语句。( ) 52、语句 msgbox(“”)和语句 msgbox””语法都出错。( ) 53、 使用函数 msgbox()和 inputbox()时至少有 “提示信息” 一个参数, 而其他可以无。 ( ) 54、在一个窗体的 form_click()事件时,出现在 end 语句之后的语句是永远不会被执行的。 ( ) 55、所有对象的属性都可以在属性窗口中设定。( ) 56、滚动条控件的 value 属性的取值范围由其 largechange 属性和 smallchange 属性决定。 ( ) 57、时钟控件的属性 interval 值为 0 时,表示屏蔽计时器。( ) 58、VB 中标识符由字母、数字、以及下划线组成,而不能使用汉字。( ) 59、用 public 关键字定义的变量,能被本应用程序中的所有过程调用。( ) 2 60、在一个标签对象中可以显示如下格式的字符串: “ax +bx+c=0” ( ) 61、 想在一个没有对象的窗体中显示图片, 只能设计阶段修改 form 的 ricture 属性。 ( ) 62、在程序执行的过程中,变量的值始终保持不变,常量的值随时改变。( ) 63、在不用 CALL 关键字调用子过程时,子过程名后面的括号可写可不写。( ) 64、对文本框的 text 属性赋值时,可省略“.text”部分。( ) 65、不能在“通用声明”中写赋值语句。( )

第 5 页 共 7 页

新课程信息技术选修模块试题:

学 校 :



算法与程序设计

三、填空题。(每空 1 分,共 20 分) 1、VB 的控件通常分 3 种类型,即 、 和 。其中,







班 别 :



不能从工具箱中删除。 2、 控件和窗体的 NAME(名称)属性只能通过 设置, 不能在 期间设



置。 3、为显示弹出式菜单,可以使用 4、弹出式菜单在 方法。 级菜单不可见。

中设计,且一定要使其 窗体。 界面。


姓 名 :

5、一个程序最多可以有 6、MDI 是指

7、VB 的赋值语句既可给程序中的

赋值,也可给对象中的 。

赋值。

线

8、已知不等式 2≤x<9,写成 VB 的表达式为

9、年号 N 能被 4 整除但不能被 100 整除,或者能被 400 整除的年份为闰年,写出



判断闰年的表达式

。 拖放和 文件 拖放。 文件和

10、 在 VB 的拖放技术中, 有两种拖放模式, 分别是 11、根据访问文件的 3 种模式,我们把文件分为

学 号 :



文件。 四、程序填空题(每空 2 分,共 10 分) 1、 求 100 以内的素数。 Private sub form_click() Dim I as integer,m as integer For m=2 to 100 For I=2 to m-1 If =0 then Goto motnextm End if
第 6 页 共 7 页



Next I Print m Notnextm: Next m End sub 2、 求一个阶乘函数的定义过程。 Privat function fac(n as integer) as long If n=1 then Else Fac=n* End if End function 3、 以下程序的功能是:生成 20 个 200-300 之间的随机整数,输出其中能被 5 整 除的数,并求出它们的和。 Private sub command1_click() For I=1 to 20 X=int( rnd *200+100) If =0 then Print x S=s+ End if Next I Print “sum=”;s End sub

第 7 页 共 7 页