《高中信息技术会考V(B部分)》由会员分享，可在线阅读，更多相关《高中信息技术会考V(B部分)（8页珍藏版）》请在金锄头文库上搜索。
1、高中信息技术会考VB 复习题一、单选题B B A D D C D A B A B C C B BC B B B C C A B C C C C D1. 计算机程序的三种结构是顺序结构、 、选择结构。A模块结构 B循环结构 C多重循环结构 DIF 块结构2. 是指用户操作引发或由系统引发，能被对象所识别并做出响应的动作。A任务 B事件 C控件 D过程3. 在 VB 中，窗口坐标系的原点在 ，x 轴向右为正，y 轴向下为正。A窗口左上角 B窗口右下角 C窗口正中间 D窗口右上角4. 在 VB 应用程序设计中，通常应对 编写程序代码。A所有对象 B窗体CTimer D有事件的对象5. 在面向对象程序
2、设计中， 用来描述对象的特征信息。A事件 B方法 C代码 D属性6. 在 VB 编程中，如果需要返回鼠标的当前位置，或了解按下的是鼠标哪个键及需要配合键盘上的 Shift、Ctrl、Alt 键时，应该使用 事件。AClick BChange CMouseDown DKeyPress7. 在 VB 应用程序设计中，如果想让 Timer 控件每秒钟响应一次，应该将其Inerval 属性设置为 。A1 B60 C100 D10008. 下列过程中， 是程序开始运行时，窗体一加载就运行的程序段。AForm_Load BForm_ClickCForm_MouseDown DForm_KeyPress9.
3、 的 Visual Basic 表达式是 。A(-b+b2-4ac)/2a B(-b+sqr(b2-4*a*c)/(2*a)C(-b+sqr(b2-4ac)/(2a) D(-b+sqr(b2-4ac)/2a10. 在 VB 系统中， 代表内存单元，是命了名的存储空间。A变量 B常量 C函数 D字节11. 语句用于声明变量，并定义变量的数据类型，给变量分配存储空间。ASub BDim CCall DEnd12. 在 VB 程序设计语言中， 语句的功能是使系统产生的随机数真正随机化。ARnd BCircle CRandomize DDim13. 关系表达式的值为 。A 数值 B字符串 C逻辑值 D
4、逻辑表达式14. 下列控件中“文本框”是 。A. Label B. TextBox C. OptionButton D. CommandButton15. 若改变一文本框中所显示文本的颜色，需改变此文本框的哪个属性？A. Caption B. Forecolor C. Backcolor D. Text16. 在 VB 环境中，如果设计时将命令按钮的 属性设置为 False，则运行时该按钮从窗体上消失。ADefault BEnabled CVisible DDisabledPicture17.在 VB 环境中，修改对象的 BackColor 的属性值，则对象的 将发生改变。A. 文字颜色 B.
5、 背景色 C. 前景色 D. 边框颜色18.用 VB 工具箱中的哪个控件可以建立命令控制按钮 B 。19.在 VB 应用程序中，修改控制代码，使 Command1 按钮显示“end” ，正确的设置是 。A. Command1.Text=“end” B. Command1.Caption=“end”C. Command1.Nameend D. Command1.Caption=end20.在 VB 程序中，当变量 H 的值等于 8 时，执行“IF H8 then R=10 else R=20”语句后， R 值为 。A5 B10 C20 D10 或 2021当 a=123: b=Str(a)，则A
6、a 和 b 均是字符型变量 Ba 是字符型变量，b 是数值型变量Ca 是数值型变量，b 是字符型变量 Da 和 b 均是数值型变量22.用循环结构解决问题时，如果循环的次数已知，通常采用 ；当循环的次数未知，需要靠判断条件是否成立来决定循环的执行和退出时，通常采用 。AForNext 循环、DoLoop 循环 BDoLoop 循环、ForNext 循环CDoNext 循环、ForLoop 循环23. 函数的作用是建立一个输入对话框。AMsgBox() BInputBox() CRGB() DPrint24A=5，B=8，则（B-A）*Rnd+A 的结果是介于_ 之间的实数。A. 5，8 B.（
7、5 ，8） C.5，8） D.（3 ，5 ）25 For i=1 to 10 Step 2 循环体中循环变量的值保持不变。Next i在程序运行时循环体将被执行_几次。A.3 次 B.4 次 C.5 次 D.6 次26执行后将会清空文本框 Text1 中文本的语句是_ 。 A. Text1.Clear B. Text1.SelText= C. Text1.text= D. Text1.SelText.Clear 27在机场托运行李，每人免费 25 千克，超过 25 千克不到 50 千克，则超出部分按每千克 10 元收费，如果超过 50 千克，则超过部分按每千克 20 元收费。这种计费程序最适合
8、用到的程序结构是A.循环 B.赋值 C.分支 D. 顺序28下面是一段循环结构的程序段：s=0x=2Do s=s+1x=x+3Loop Until (x=12)该程序段运行后，循环体的执行次数是A.1 B.2 C.3 D. 4二、多选题ABC ABC BD AD BCD ABCD ABCD1 在 VB 应用程序设计中，以下说法正确的是：A对象包括窗体和控件B属性用来描述和确定对象的特征信息C事件是指用户操作引发或由系统引发，能被对象所识别并做出响应的动作 D方法是指程序设计的方法 2在 VB 应用程序设计中，以下说法正确的是：A要显示不想让用户修改的文本时，应该使用 Label 控件B要显示可
9、以让用户编辑的文本时，应该使用 TextBox 控件C鼠标单击可以用 Click 事件D要想画图形，只能在窗体中实现3在 VB 编程中，如果需要返回鼠标的当前位置时，应该使用 或 事件。AClick BMouseDown CChange DMouseMove4下列字符串中，不能作为变量名使用的有：AEnd Ba1 Cxx DSub5在 VB 应用程序设计中，以下说法正确的是：AAbs( )是转换英文大小写的函数BMsgBox( ) 是消息函数CRGB( )是颜色函数DSqr( )是求平方根函数6VB 简单应用程序的设计步骤为： A设计图形用户界面B设置对象属性C编写对象事件过程及通用过程代码D
10、运行调试程序并保存工程7在 VB 程序设计中，Dim 语句的功能为：A使系统能够按声明进行语法检查，有利于程序的调试、运行B合理分配内存C定义变量的作用范围D增强程序的可读性三、读程序运行结果1. 下列程序运行后，变量 s= C 。Dim a,b,c,s As Integera=9b=41c=2*(a+b)s=a*cA100 B 50 C900 D3002. 下列程序运行后，变量 x= D 。Dim n,x As Integern=5Private Sub Form_Load()x=1For i=1 To nx=x*iNext iEnd SubA5 B15 C24 D1203. 下列程序运行后
11、，变量 k= C 。Dim k As IntegerPrivate Sub Command1_Click()k=0For i=7 To 100 Step 7k=k+1Next i End SubA0 B7 C14 D154. 下列程序的结果是： _S=6_Private Sub From_Activate()S=1For I=1 to 3 Step 1S=S*INext IPrint “S=”;SEnd Sub5. 下列程序的结果是： I=2I=4Private Sub Form_activate()For I=1 to 4 Step 1If I Mod 2=0 thenPrint ”I=”;
12、IEnd ifNext IEnd Sub6. 阅读以下程序Private Sub Command1_Click()Print “* * Hi ,”Print “how are you * *”End Sub当程序执行时，单击 Command1 后，输出结果是 * * Hi ,how are you * *7. 阅读以下程序段Private Sub Command1_Click()For R =100 to 520 step 100b1 = 255 * Rndb2 = 255 * Rndb3 = 255 * RndPicture2.Circle(1000,1000), R,RGB(b1,b2,b
13、3)Next REnd Sub当程序执行时，单击 command1 后，将在（何处）_ Picture2_显示_5_个颜色_ 不同 _（填相同或不同）的同心圆。8. 阅读以下程序段Private Sub Command1_Click()S = 1For a =3 to 12 step 4S = S + 2 Next aPrint “S = ”；SEnd Sub当程序执行后，S 的值是_7_，a 的值是_15_。9. 以下是求任意圆面积的程序Private Sub Command1_Click()R = InputBox(请输入圆的半径,数据输入,16)print “S=”；3.14*R*REnd Sub在程序执行过程中单击 Command1 时，出现了右图所示的窗口，请根据如图所示信息，在空白处补充对应的程序语句。10. 以下是求计算 8 阶乘的程序，请将该程序补充完整Private Sub Command1_Click()S = _1_For k= _1_ to _8_ step _1_s=s*k_Next kEnd Sub11Private Sub Form_Activate ()Line(1000,1000)-(2000,100
