vb控制结构综合练习
- 格式:doc
- 大小:43.02 KB
- 文档页数:9
第二部分综合练习理论练习一一单选1-5 CDCCB 640ABDCD 11-15 CCBBD 16-20 DBCBA二多选1 ABCE 2CE 3 BCE 4 ADE 5 ABCD6ABCDE 7ACD8ABCDE 9 ABC 10ABCDE三判断1-5 X V X V V6-10 V X V V V四填空1 x=int(Rnd*101)End If avg=s/82 i=l to 10Right(str(i),l)或Right(str(i mod 10))3 m*n/GCD(m,n)GCD(b, a mod b)4 Exit For i & “是素数”Next i五阅读程序1-4 DDCB六程序设计1Option Base 1Private Sub Form_click()Dim a( 10)Ciscreatedata a()sort a()Fori= ITo 10Print a(i);Next iEnd SubSub createdata(a())Fori = ITo 10a(i) = Int(Rnd * 101)Next iEnd SubSub sort(a())For i = 1 To 9Forj = 1 To 10-iIf a(j) > a(j + l)Thent = a(j): a(j) = a(j + 1): a(j + 1) = tEnd IfNext jNext iEnd Sub2Private Type ksno As String * 8Bscj As IntegerSjcj As IntegerEnd TypeDim student As ksPrivate Sub Form_Load()Open "c:\ksxx.dat" For Random As#l Len = Len(student)End SubPrivate Sub cmdadd_Click()student.no = Text 1.Textstudent.Bscj = Val(Text2.Text)student.Sjcj = Vai (Tex t3.Text)lastrecord = LOF( 1) / Len(student) + 1Put # 1, lastrecord, studentTextl.Text =Text2.Text = ””Text3.Text ="End SubPrivate Sub cmdquit_Click()Close #1EndEnd Sub1-5 CABCD理论练习二6-10 ABCCD 11-15 BBBAB1 CD2 AD3CE4BC6BCDE7CDE8ABCDE9 ABD三判断二多选1-5 X X X X V 6-10 V V V X X 16-20 DBAAC5 AD10ACDE1n-l 或者Sqr (n)02X y3 1 to 102*i-14Button=2start=True 五阅读程序1-5DBDAB六程序设计1Private Sub Form_click()四填空japan = 47528china = 22257n = 0 True — (x, y)Do While china <= japanchina = china * 1.098japan = japan * 1.028 n= n + 1LoopPrint n & ”年之后,中国GDP将超过日本”End Sub•VB6中的Split函数,其功能足将一字符巾用分界符分割为一字符串数组。
1.对于语句If x=1 Then y=1,下列说法正确的是()。
A、x=1 和 y=1 均为赋值语句B、x=1 和 y=1 均为关系表达式C、x=1 为关系表达式, y=1 为赋值语句D、x=1 为赋值语句, y=1 为关系表达式答案:C,此题考察IF语句的基本理解,等号有关系运算符以及赋值两种作用。
2.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是()。
A、If sex="男"And age<40 And (duty="教授"Or duty="副教授") Then n=n+1B、If sex="男"And age<40 And InStr(duty,"教授")>0 Then n=n+1C、If sex="男"And age<40 And Right(duty,2)= "教授" Then n=n+1D、If sex="男"And age<40 And duty="教授"And duty="副教授" Then n=n+1答案:D ,选项中的InStr(duty,"教授")>0表示duty字符串中含有“教授”两个字,Right(duty,2)= "教授"表示duty字符串右边两个字是“教授”。
3.下面程序段求两个数中的大数,不正确的是()。
A、Max=IIf(x>y,x,y)B、If x>y Then Max=x Else Max=yC、Max=x:If y>=x Then Max=yD、If y>x Then Max=y :Max=x答案:D,在D项中,冒号将两个语句相连,由于Max=x无论如何都会被执行,所以输出的永远是x的值。
vb试题及答案(共10篇)篇1:计算机vb试题及答案计算机vb试题及答案(1)下面叙述正确的是(C)A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.以上三种描述都不对(2)以下数据结构中不属于线性数据结构的是(C)A.队列B.线性表C.二叉树D.栈(3)在一棵二叉树上第5层的结点数最多是(B)注:由公式2k-1得A.8B.16C.32D.15(4)下面描述中,符合结构化程序设计风格的是(A)A.使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑B.模块只有一个入口,可以有多个出口C.注重提高程序的执行效率D.不使用goto语句(5)下面概念中,不属于面向对象方法的是(D)A.对象B.继承C.类D.过程调用(6)在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是(B)A.可行性分析B.需求分析C.详细设计D.程序编码(7)在软件开发中,下面任务不属于设计阶段的是(D)A.数据结构设计B.给出系统模块结构C.定义模块算法D.定义需求并建立系统模型(8)数据库系统的核心是(B)A.数据模型B.数据库管理系统C.软件工具D.数据库(9)下列叙述中正确的是(C)A.数据库是一个独立的系统,不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中,数据的物理结构必须与逻辑结构一致(10)下列模式中,能够给出数据库物理存储结构与物理存取方法的是(A)A.内模式B.外模式C.概念模式D.逻辑模式(11)算法的时间复杂度是指(C)A.执行算法程序所需要的时间B.算法程序的长度C.算法执行过程中所需要的基本运算次数D.算法程序中的指令条数(12)算法的空间复杂度是指(D)A.算法程序的长度B.算法程序中的指令条数C.算法程序所占的存储空间D.算法执行过程中所需要的存储空间(13)设一棵完全二叉树共有699个结点,则在该二叉树中的叶子结点数为(B)注:利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出A.349B.350C.255D.351(14)结构化程序设计主要强调的是(B)A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性(15)在软件生命周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)注:即第一个阶段A.概要设计B.详细设计C.可行性分析D.需求分析(16)数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。
A) 0 B) 1 C) ””D) False 控制结构4.设a=6,则执行x=IIf(a>5,-1,0)后,x的值一、选择题为________。
种基本结构1.VB的3种结构化程序设计的3A) 5 B) 6 C) 0 D) –1是________。
5.下面程序段的运行结果是________。
A) 选择结构、过程结构、顺序结构cj=85递归结构、选择结构、顺序结构B)晉挠??吠敨?橤尽屁过程结构、转向结构、递归结构C)晉挠??吠敨?橤尽层D) 选择结构、顺序结构、循环结构晉挠??吠敨?橤尽屃2.段函数表用If语句示分晉挠??吠敨?橤尽屄3?1x?x?1?x)(f表________ ,以下?311x?x?晉挠??吠敨?橤尽居?示方法不正确。
Print dj=;djA) f=x^3+1A) dj=B B) dj=C C) dj=D D) dj=E1 If x>=1 Then f=s^3--B) If x>=1 Then f=x^31If x<1 Then f=x^3+1-1C) If x>=1 Then f=x^3f=x^3+16.下列语句正确的是________。
D) If x<1 Then f=x^3+1 Else A) If K<3*N And k>N Then N=k^3F=x^31-B) If K<3*N And k>N Then N=k3。
执行下面的程序段后显示结果是3.________ C) If K<3*N : k>N Then N=k^3 Private SubForm_Click() D) If K<3*N And k>N Then N=k**3 Dim m ,则下列L=True,z=6.0,,7.设X=2.0y=8.0是的值为True中达BasicVisual 表式If m Then Print m Else Print m+1 。
下面的138道题目,在二级考试中命中率极高。
一、选择题(1) 下面叙述正确的是(C)A. 算法的执行效率与数据的存储结构无关B. 算法的空间复杂度是指算法程序中指令(或语句)的条数C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止D. 以上三种描述都不对(2) 以下数据结构中不属于线性数据结构的是(C)A. 队列B. 线性表C. 二叉树D. 栈(3) 在一棵二叉树上第5层的结点数最多是(B) 注:由公式2k-1得A. 8B. 16C. 32D. 15(4) 下面描述中,符合结构化程序设计风格的是(A)A. 使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑B. 模块只有一个入口,可以有多个出口C. 注重提高程序的执行效率D. 不使用goto语句(5) 下面概念中,不属于面向对象方法的是 (D) 注:P55-58A. 对象B. 继承C. 类D. 过程调用(6) 在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是(B)A. 可行性分析B. 需求分析C. 详细设计D. 程序编码(7) 在软件开发中,下面任务不属于设计阶段的是(D)A. 数据结构设计B. 给出系统模块结构C. 定义模块算法D. 定义需求并建立系统模型(8) 数据库系统的核心是(B)A. 数据模型B. 数据库管理系统C. 软件工具D. 数据库(9) 下列叙述中正确的是(C)A.数据库是一个独立的系统,不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中,数据的物理结构必须与逻辑结构一致(10) 下列模式中,能够给出数据库物理存储结构与物理存取方法的是(A) 注:P108A. 内模式B. 外模式C. 概念模式D. 逻辑模式(11) 算法的时间复杂度是指(C)A. 执行算法程序所需要的时间B. 算法程序的长度C. 算法执行过程中所需要的基本运算次数D. 算法程序中的指令条数(12) 算法的空间复杂度是指(D)A. 算法程序的长度B. 算法程序中的指令条数C. 算法程序所占的存储空间D. 算法执行过程中所需要的存储空间(13) 设一棵完全二叉树共有699个结点,则在该二叉树中的叶子结点数为(B) 注:利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出A. 349B. 350C. 255D. 351(14) 结构化程序设计主要强调的是(B)A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性(15) 在软件生命周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D) 注:即第一个阶段A. 概要设计B. 详细设计C. 可行性分析D. 需求分析(16) 数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。
国家二级VB机试(综合应用题)模拟试卷2(题后含答案及解析) 题型有:1.1.在考生文件夹下有一个工程文件sjt5.vbp,在其窗体中有一个实心圆。
程序运行时,当用鼠标左键单击窗体任何空白位置时,实心网则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。
窗体文件中已经给出了全部控件,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,不能修改程序的其他部分和控仲属性。
最后将修改后的文件按原文件名存盘。
正确答案:【操作步骤】步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,去掉程序中的注释符,将问号改为正确的内容。
参考答案Dim stepy As Integer ‘纵向移动增量Dim Stepx As Integer ‘横向移动增量Const LEFT BUTTON=1 Private Sub Form_MouseDown(Button As Integer,Shift As Integer,x As Single,y As Single) Dim x0 As Integer,y0 As Integer,a As Single,radius As_Integer radius=Shapel.Width/2 ‘圆的半径If Button=LEFT BUTTON Then ‘单击鼠标左键移动x0=Shapel.Left+radius’圆心的x坐标y0=Shapel.Top+radius’圆心的y坐标If x=x0 Then’垂直移动stepy=Sgn(y-y0)*50 stepx=0 Else’倾斜移动a=(y-y0)/(x-x0)’斜率stepx=Sgn(x-x0)*50 stepy=a*stepx ‘通过stepx确定stepy的值If Abs(stepy)>Abs(stepx)Then stepy=Sgn(y-y0)*50 stepx=stepy/a End If End If Timer1.Enabled=True’单击鼠标左键则触发Timer事件E1se Timer1.Enabled=False’单击鼠标右键则停止Timer事件End If End Sub Private Sub Timer1_Timer( ) Shape1.Move Shape1.Left+stepx,Shapel.Top+stepy’移动shapel End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
VB顺序结构与选择结构练习题VB顺序结构及选择结构练习一、单选题1.在窗体上画一个命令按扭(名称为Command1),然后编写如下事件过程Private Sub Command1_Click()b=5c=6Print a = b + cEnd Sub程序运行后,单击命令按扭,其结果为(D)A)a=11 B)a=b + c C)a= D)False2. 在窗体上画一个命令按扭(名称为Command1),然后编写如下事件过程Private Sub Command1_Click(D)a=11b=5c=6Print a = b + cEnd Sub程序运行后,单击命令按扭,其结果为()A)a=11 B)a=b + c C)a= D)True3.以下语句的输出结果是(B)a = Sqr(3)Print Format(a,”$$#### : ###”)A)$1.732 B)$$1.732 C)$1732 D)$$00001.7324.以下程序段的输出结果是(D)a = Sqr(3)b = Sqr(2)c =a>bPrint cA)-1 B)0 C)False D)True5.以下语句的输出结果是(C)Print Format$ (32548.5,”000,000.00”)A)32548.5 B)32,548.5 C)032,548.50 D)32,548.501.假定有如下语句:answer$=MsgBox(“String1”,, “String2”, “String3”,2)执行该语句后,将显示1个信息框,此时如果单击“确定”按扭,则answer$的值为(D)A)String1 B)String2 C)String3 D)12.InputBox函数返回值的类型为(B)A)数值 B)字符串 C)变体 D)数值或字符串(视输入的数据而定)3.在窗体上画1个名为Command1的命令按扭,然后编写如下事件过程。
下面的138道题目,在二级考试中命中率极高。
一、选择题(1) 下面叙述正确的是(C)A. 算法的执行效率与数据的存储结构无关B. 算法的空间复杂度是指算法程序中指令(或语句)的条数C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止D. 以上三种描述都不对(2) 以下数据结构中不属于线性数据结构的是(C)A. 队列(3)(4)A.(5)A. 对象(6)A.(7)A.C.(8)A. 数据模型B. 数据库管理系统C. 软件工具D. 数据库(9) 下列叙述中正确的是(C)A.数据库是一个独立的系统,不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中,数据的物理结构必须与逻辑结构一致(10) 下列模式中,能够给出数据库物理存储结构与物理存取方法的是(A) 注:P108A. 内模式B. 外模式C. 概念模式D. 逻辑模式(11) 算法的时间复杂度是指(C)A. 执行算法程序所需要的时间B. 算法程序的长度C. 算法执行过程中所需要的基本运算次数D. 算法程序中的指令条数(12) 算法的空间复杂度是指(D)A. 算法程序的长度B. 算法程序中的指令条数C. 算法程序所占的存储空间D. 算法执行过程中所需要的存储空间(13)(14)A.C.(15)(D)A.(16)A.(17)以及A.(18) 下述关于数据库系统的叙述中正确的是(A)A. 数据库系统减少了数据冗余B. 数据库系统避免了一切冗余C. 数据库系统中数据的一致性是指数据类型的一致D. 数据库系统比文件系统能管理更多的数据(19) 关系表中的每一横行称为一个(A)A. 元组B. 字段C. 属性D. 码(20) 数据库设计包括两个方面的设计内容,它们是(A)A. 概念设计和逻辑设计B. 模式设计和内模式设计C. 内模式设计和物理设计D. 结构特性设计和行为特性设计(21) 下列叙述中正确的是(A)A. 线性表是线性结构B. 栈与队列是非线性结构C. 线性链表是非线性结构D. 二叉树是线性结构(22)A.C.(23)A.C.(24)A.C.(25)A.C.(26)A. 工具B. 过程C. 方法D. 环境(27) 程序流程图(PFD)中的箭头代表的是(B) 注:P81A. 数据流B. 控制流C. 调用关系D. 组成关系(28) 在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。
控制结构一、选择题1.VB 的3种结构化程序设计的3种基本结构是________。
A) 选择结构、过程结构、顺序结构 B) 递归结构、选择结构、顺序结构 C) 过程结构、转向结构、递归结构 D) 选择结构、顺序结构、循环结构2.用If 语句表示分段函数3311()11x x f x x x ⎧-≥=⎨+<⎩ ,以下________表示方法不正确。
A) f=x^3+1If x>=1 Then f=s^3-1 B) If x>=1 Then f=x^3-1 If x<1 Then f=x^3+1 C) If x>=1 Then f=x^3-1 f=x^3+1D) If x<1 Then f=x^3+1 Else F=x^3-13.执行下面的程序段后显示结果是________。
Private Sub Form_Click() Dim mIf m Then Print m Else Print m+1 End SubA) 0 B) 1 C) ”” D) False4.设a=6,则执行x=IIf(a>5,-1,0)后,x 的值为________。
A) 5 B) 6 C) 0 D) –15.下面程序段的运行结果是________。
cj=85If cj>90 Then dj="A" If cj>80 Then dj="B" If cj>70 Then dj="C" If cj>60 Then dj="D" If cj<60 Then dj="E" Print "dj=";djA) dj=B B) dj=C C) dj=D D) dj=E6.下列语句正确的是________。
A) If K<3*N And k>N Then N=k^3 B) If K<3*N And k>N Then N=k3 C) If K<3*N : k>N Then N=k^3 D) If K<3*N And k>N Then N=k**37.设X=2.0,y=8.0,z=6.0,L=True ,则下列Visual Basic 表达式中值为True 的是________。
计算机二级VB训练题及答案2017年计算机二级VB训练题及答案计算机等级考试要取得好成绩平时一定要多加练习,提高做题技巧和速度。
下面是店铺为大家整理的2017年计算机二级VB训练题及答案,希望对大家有帮助!练习一1.在待排序的元素序列基本有序的前提下,效率最高的排序方法是(C)A)冒泡排序B)选择排序C)快速排序D)归并排序2.非空的循环单链表head的尾结点(由p所指向),满足(A)A)p->next==NULLB)p==NULLC)p->next=headD)p=head3.线性表的顺序存储结构和线性表的链式存储结构分别是(C)A)顺序存取的存储结构、顺序存取的存储结构B)随机存取的存储结构、顺序存取的存储结构C)随机存取的存储结构、随机存取的存储结构D)任意存取的存储结构、任意存取的存储结构4.结构化程序设计所规定的三种基本控制结构是(D)A)输入、处理、输出B)树形、网形、环形C)顺序、选择、循环D)主程序、子程序、函数5.下列不属于软件调试技术的是(D)A)强行排错法B)集成测试法C)回溯法D)原因排除法6.软件生命周期中花费时间最多的阶段是(B)A)详细设计B)软件编码C)软件测试D)软件维护7.软件设计中,有利于提高模块独立性的一个准则是(A)A)低内聚低耦合B)低内聚高耦合C)高内聚低耦合D)高内聚高耦合8.数据库的故障恢复一般是由(D)A)数据流图完成的B)数据字典完成的C)DBA完成的D)PAD图完成的9.下列关系运算的叙述中,正确的是(B)A)投影、选择、连接是从二维表行的方向进行的运算B)并、交、差是从二维表的列的方向来进行运算C)投影、选择、连接是从二维表列的方向进行的运算D)以上3种说法都不对10.在关系数据库中,对一个关系做投影操作后,新关系的.元组个数将(A)A)等于原来关系中的元组个数B)大于原来关系中的元组个数C)小于原来关系中的元组个数D)不能确定元组个数11.以下不具有Picture属性的对象是(B)A)窗体B)图片框C)图像框D)文本框12.双击窗体中的对象后,Visual Basic将显示的窗口是(D)A)项目(工程)窗口B)工具箱C)代码窗口D)属性窗口13.若要将窗体从内存中卸载,其实现的方法是(A)A)ShowB)UnLoadC)LoadD)Hide14.要使目录列表框(名称为Dirl)中的目录随着驱动器列表框(名称为Drivel)中所选择的当前驱动器的不同而同时发生变化,则应:(A)A)在Dirl中的Change事件中,书写语句 Dirl.Drive=Drivel.DriveB)在Dirl中的Change事件中,书写语句 Dirl.Path=Drivel.DriveC)在Drivel中的Change事件中,书写语句Dirl.Path=Drivel.DriveD)在Drivel中的Change事件中,书写语句Dirl.Drive=Drivel.Drive15.设有如下声明:Dim x As Integer如果Sgn(x)的值为-1,则表示x的值是(A)A)整数B)大于0的整数> C)等于0的整数D)小于0的数16.下述说法不正确的是(B)A)变量名的长度不能超过255个字符B)变量名可以包含小数点或者内嵌的类型声明字符C)变量名不能使用关键字D)变量名的第一个字符必须是字母17.下列可作为Visual Basic变量名的是(A)A)FilenameB)A(A+B)C)A%DD)Print18.语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是(BD)A)-36B)1C)-1D)-7219.下面说法中,不正确的是(D)A)Cls清除由Print方法显示的文本或在图片框中显示的图形,并把光标移到对象的左上角(0,0)B)当前窗体是用Picture属性装入的图形时,也可以用Cls方法清除C)Move方法用来移动窗体和控件,并改变其大小D)Cls方法中的对象,可以是窗体或图片框,如果省略则清除当前窗体中显示的内容20.假定在图片框Picturel中装入了一个图形,为了清除该图形(注意,清除图形,而不是删除图片框),应采用的正确方法是(D)A)选择图片框,然后按Del键B)执行语句 Picturel.picture=LoadPicture("")C)执行语句 Picturel.picture=""D)选择图片框,在属性窗口中选择Picture属性条,然后按回车键[ 结束 ]练习二1.下列关于栈的叙述正确的是(D)A)栈是非线性结构B)栈是一种树状结构C)栈具有先进先出的特征D)栈具有后进先出的特征2.若某二叉树的前序遍历访问顺序是abdgcefh,中序遍历访问顺序是dgbaechf,则其后序遍历的结点访问顺序是(D)A)bdgcefhaB)gdbecfhaC)bdgaechfD)gdbehfca3.根据数据结构中各数据元素之间前后件关系的复杂程度,一般将数据结构分成(C)A)动态结构和静态结构B)紧凑结构和非紧凑结构C)线性结构和非线性结构D)内部结构和外部结构4.下面对对象概念描述错误的是(A)A)任何对象都必须有继承性B)对象是属性和方法的封装体C)对象间的通讯靠消息传递D)操作是对象的动态属性5.软件开发的结构化生命周期方法将软件生命周期划分成(A)A)定义、开发、运行维护B)设计阶段、编程阶段、测试阶段C)总体设计、详细设计、编程调试D)需求分析、功能定义、系统设计6.下列工具中为需求分析常用工具的是(D)A)PADB)PFDC)N-SD)DFD7.开发大型软件时,产生困难的根本原因是(A)A)大系统的复杂性B)人员知识不足C)客观世界千变万化D)时间紧、任务重8.下述关于数据库系统的叙述中正确的是(A)A)数据库系统减少了数据冗余B)数据库系统避免了一切冗余C)数据库系统中数据的一致性是指数据类型一致D)数据库系统比文件系统能管理更多的数据9.单个用户使用的数据视图的描述称为(A)A)外模式B)概念模式C)内模式D)存储模式10.关系数据库管理系统能实现的专门关系运算包括(B)A)排序、索引、统计B)选择、投影、连接C)关联、更新、排序D)显示、打印、制表11.与传统的程序设计语言相比,Visual Basic 最突出的特点是(C)A)结构化程序设计B)程序开发环境C)事件驱动编程机制D)程序调试技术12.在Visual Basic 中,下列优先级最高的运算符是(A)A)*B)\C)<D)Not13.下列语句用来设置疤錐orm1的属性,其中在运行时不能正确操作的语句是(B)A)Form1.Caption="Form Test"B)="Form Test"C)Form1.MaxButton=FalseD)Form1.MinButton=False14.表达式Left("how are you",3)的值是(A)A)howB)areC)youD)how are you15.在设计阶段,当双击窗体上的某个控件时,所打开的窗口是(C)A)工程资源管理器窗口B)工具箱窗口C)代码窗口D)属性窗口16.下列正确的Visual Basic注释语句是(B)A)Dim a(10)As Integer Rem 这是一个VB程序B)这是一个VB程序P Private Sub Command1_Click() …C)a=1:b=2:_Rem 这是一个VB程序:c=3D)If Shift=6 And Button=2 ThenPrint"BBBB"Rem这是一个VB程序End If17.代数式ab+cd对应的Visual Basic6.0表达式是(A)A)a/(b+c/D)B)(a/b+c)/dC)a/(b+c)/dD)a/b+c/d18.使程序立即从一个Function过程中退出的语句是(A)A)Exit FunctionB)ExitC)ReturnD)Resume19.要使一个标签透明且具有边框,则应(B)A)将其BackStyle属性设置为0,BorderStyle属性设置为0B)将其BackStyle属性设置为0,BorderStyle属性设置为1C)将其BackStyle属性设置为1,BorderStyle属性设置为0D)将其BackStyle属性设置为1,BorderStyle属性设置为120.在窗体上画一个命令按钮,然后编写如下代码:Private Sub Command1_Click()a&=InputBox("请输入第一个数")b&=InputBox("请输入第二个数")Print b&+a&End Sub程序运行后,单击命令按钮,在两个输入对话框中先后输入12345和54321,程序的输出结果是(A)A)66666B)5432112345C)1234554321D)出错[ 结束 ]【2017年计算机二级VB训练题及答案】。
国家二级VB机试(控制结构)模拟试卷11(总分:54.00,做题时间:90分钟)一、选择题(总题数:27,分数:54.00)1.有下面程序代码: Private Sub Command1_Click() Dim sign As Integer sign=1 a=1:b=2 For k=l To 5 c=a+sign*b a=b:b=c Print c: sign=-sign Next k End Sub 程序运行后,单击命令按钮Command1,输出结果是(分数:2.00)A.3 -1 2 -3 -1 √B.3 5 8 13 21C.-1 1 -2 -1 -1D.3 4 5 6 7解析:解析:在每次循环中sign的值在1和-1之间来回变化,第一次循环时sign的值为1;在循环中c 的值为a+sign*b,然后将b赋值给a,c赋值给b;因此第一次循环结束后c的值为3,a的值为2,b的值为3;第二次循环结束后c的值为-1,a的值为3,b的值为-1;第三次循环结束后c的值为2,a的值为-1,b的值为2;第四次循环结束后c的值为-3,a的值为2,b的值为-3;第五次循环结束后c的值为-1,a的值为-3,b的值为-1。
2.编写如下程序: Private Sub Command1_Click() Dim a(10)As String s="123456":n=Len(s) For k=1 To n a(k)=Mid(s,k,1) Next k For i=1 To n\2 t=a(i) a(i)=a(n-i+1):a(n-i+1)=t Next i For k=l To n Print a(k); Next k End Sub 程序运行后,单击命令按钮Command1,输出结果为(分数:2.00)A.654321 √B.123456C.654123D.123654解析:解析:本题中有三个For循环,但是这三个循环之间没有嵌套关系,而是顺序的关系。
全国计算机二级VB模拟题及答案全国计算机二级VB模拟题及答案计算机二级复习时关键在于多操作,熟练各种题型。
以下是应届毕业生店铺整理的全国计算机二级VB模拟题及答案,祝大家考试顺利。
1.在待排序的元素序列基本有序的前提下,效率最高的排序方法是(C)A)冒泡排序B)选择排序C)快速排序D)归并排序2.非空的循环单链表head的尾结点(由p所指向),满足(A)A)p->next==NULLB)p==NULLC)p->next=headD)p=head3.线性表的顺序存储结构和线性表的链式存储结构分别是(C)A)顺序存取的存储结构、顺序存取的存储结构B)随机存取的存储结构、顺序存取的存储结构C)随机存取的存储结构、随机存取的存储结构D)任意存取的存储结构、任意存取的存储结构4.结构化程序设计所规定的三种基本控制结构是(D)A)输入、处理、输出B)树形、网形、环形C)顺序、选择、循环D)主程序、子程序、函数5.下列不属于软件调试技术的是(D)A)强行排错法B)集成测试法C)回溯法D)原因排除法6.软件生命周期中花费时间最多的阶段是(B)A)详细设计B)软件编码C)软件测试D)软件维护7.软件设计中,有利于提高模块独立性的一个准则是(A)A)低内聚低耦合B)低内聚高耦合C)高内聚低耦合D)高内聚高耦合8.数据库的故障恢复一般是由(D)A)数据流图完成的B)数据字典完成的C)DBA完成的D)PAD图完成的9.下列关系运算的叙述中,正确的是(B)A)投影、选择、连接是从二维表行的方向进行的运算B)并、交、差是从二维表的列的方向来进行运算C)投影、选择、连接是从二维表列的方向进行的运算D)以上3种说法都不对10.在关系数据库中,对一个关系做投影操作后,新关系的元组个数将(A)A)等于原来关系中的元组个数B)大于原来关系中的元组个数C)小于原来关系中的元组个数D)不能确定元组个数11.以下不具有Picture属性的对象是(B)A)窗体B)图片框C)图像框D)文本框12.双击窗体中的对象后,Visual Basic将显示的'窗口是(D)A)项目(工程)窗口B)工具箱C)代码窗口D)属性窗口13.若要将窗体从内存中卸载,其实现的方法是(A)A)ShowB)UnLoadC)LoadD)Hide14.要使目录列表框(名称为Dirl)中的目录随着驱动器列表框(名称为Drivel)中所选择的当前驱动器的不同而同时发生变化,则应:(A)A)在Dirl中的Change事件中,书写语句 Dirl.Drive=Drivel.DriveB)在Dirl中的Change事件中,书写语句 Dirl.Path=Drivel.DriveC)在Drivel中的Change事件中,书写语句Dirl.Path=Drivel.DriveD)在Drivel中的Change事件中,书写语句Dirl.Drive=Drivel.Drive15.设有如下声明:Dim x As Integer如果Sgn(x)的值为-1,则表示x的值是(A)A)整数B)大于0的整数C)等于0的整数D)小于0的数16.下述说法不正确的是(B)A)变量名的长度不能超过255个字符B)变量名可以包含小数点或者内嵌的类型声明字符C)变量名不能使用关键字D)变量名的第一个字符必须是字母17.下列可作为Visual Basic变量名的是(A)A)FilenameB)A(A+B)C)A%DD)Print18.语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是(BD)A)-36B)1C)-1D)-7219.下面说法中,不正确的是(D)A)Cls清除由Print方法显示的文本或在图片框中显示的图形,并把光标移到对象的左上角(0,0)B)当前窗体是用Picture属性装入的图形时,也可以用Cls方法清除C)Move方法用来移动窗体和控件,并改变其大小D)Cls方法中的对象,可以是窗体或图片框,如果省略则清除当前窗体中显示的内容20.假定在图片框Picturel中装入了一个图形,为了清除该图形(注意,清除图形,而不是删除图片框),应采用的正确方法是(D)A)选择图片框,然后按Del键B)执行语句 Picturel.picture=LoadPicture("")C)执行语句 Picturel.picture=""D)选择图片框,在属性窗口中选择Picture属性条,然后按回车键21.线性表L=(a1,a2,a3,…ai,…an),下列说法正确的是(D)A)每个元素都有一个直接前件和直接后件B)线性表中至少要有一个元素C)表中诸元素的排列顺序必须是由小到大或由大到小D)除第一个元素和最后一个元素外,其余每个元素都有一个且只有一个直接前件和直接后件22.设树T的度为4,其中度为1,2,3,4的结点个数分别为4,2,1,1。
试题1.第1题单选题下面不是VB工作模式的是()A、设计模式B、运行模式C、汇编模式D、中断模式标准答案:C您的答案:C题目分数:5此题得分:5.0批注:2.第2题单选题若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的()属性A、BACKCOLORB、BORDERSTYLEC、FORECOLORD、BACKSTYLE标准答案:D您的答案:D题目分数:5此题得分:5.0批注:3.第3题单选题Visual Basic继承了Basic语言简单易用的语法特点,同时支持面向对象的编程机制,其中构成其控件(对象)的三要素是()A、属性、事件、事件过程B、控件、窗体、事件C、属性、过程、方法D、属性、事件、方法标准答案:D您的答案:D题目分数:5此题得分:5.0批注:4.第4题单选题决定控件上文字的字体、字形、大小及效果的属性是()A、TEXTB、CAPTIONC、NAMED、FONT标准答案:D您的答案:D题目分数:5此题得分:5.0批注:5.第5题单选题VB应用程序的运行模式是()A、解释运行模式B、编译运行模式C、两者都有D、汇编模式标准答案:C您的答案:C题目分数:5此题得分:5.0批注:6.第6题单选题Visual Basic的编程机制是()A、可视化B、面向对象C、面向图形D、事件驱动标准答案:D您的答案:D题目分数:5此题得分:5.0批注:7.第7题单选题可视化编程的最大优点是()A、具有标准工具箱B、一个工程文件由若干个窗体文件组成C、不需要编写大量代码来描述图形对象D、所见即所得标准答案:C您的答案:C题目分数:5此题得分:5.0批注:8.第8题单选题在运行阶段,要在文本框TEXT1获得焦点时选中文本框中所有内容,对应的事件过程是()A、Private Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubB、Private Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubC、Private Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubD、Private Sub Text1_SetFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub标准答案:A您的答案:A题目分数:5此题得分:5.0批注:9.第9题单选题决定标签(Label)显示的属性是()A、TextB、NameC、CaptionD、Alignment标准答案:C您的答案:C题目分数:5此题得分:5.0批注:10.第10题单选题下列不能打开属性窗口的操作是()A、执行“视图”菜单中的“属性窗口”命令B、按F4键C、按Ctrl TD、单击工具栏上的“属性窗口”按钮标准答案:C您的答案:C题目分数:5此题得分:5.0批注:11.第11题单选题运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文本框的()事件A、CLICKB、DBLCLICKC、GOTFOCUSD、CHANGE标准答案:D您的答案:D题目分数:5此题得分:5.0批注:12.第12题单选题为了防止用户随意将光标置于控件上,应()A、将控件的TABINDEX属性设置为0B、将控件的TABSTOP属性设置为TRUEC、将控件的TABSTOP属性设置为FALSED、将控件的ENABLED属性设置为FALSE标准答案:D您的答案:D题目分数:5此题得分:5.0批注:13.第13题单选题以下能够触发文本框Change事件的操作是()A、文本框失去焦点B、文本框获得焦点C、设置文本框的焦点D、改变文本框的内容标准答案:D您的答案:D题目分数:5此题得分:5.0批注:14.第14题单选题如果要在文本框中输入字符时,只显示某个字符,如星号(*),运行时,在文本框中输入的字符仍然显示出来,而不显示星号,原因可能是()A、文本框的MULTILINE属性值为TRUEB、文本框的LOCKED属性值为TRUEC、文本框的MULTILINE属性值为FALSED、文本框的LOCKED属性为FALSE标准答案:B您的答案:B题目分数:5此题得分:5.0批注:15.第15题单选题下列可以打开立即窗口的操作是()A、Ctrl DB、Ctrl EC、Ctrl FD、Ctrl G标准答案:D您的答案:D题目分数:5此题得分:5.0批注:16.第16题单选题在窗体上建立了多个控件,如TEXT、LABEL1、COMMAND1,若要使程序一运行焦点就定位在COMMAND1控件上,应将COMMAND1控件的()设置为0A、INDEXB、TABINDEXC、TABSTOPD、ENABLED标准答案:B您的答案:B题目分数:5批注:17.第17题单选题应用程序设计完成后,应将程序保存,保存的过程是()A、只保存窗体文件即可B、只保存工程文件即可C、先保存工程文件,之后保存窗体文件D、先保存窗体文件(或标准模块文件),之后还要保存工程文件标准答案:D您的答案:D题目分数:5此题得分:5.0批注:18.第18题单选题任何控件都具有的属性是()A、TEXTB、CAPTIONC、NAMED、FORECOLOR标准答案:C您的答案:C题目分数:5此题得分:5.0批注:19.第19题单选题在运行时,按TAB键跳过了一个可以获得焦点的控件(如文本框),则可能是因为()A、该控件的TABSTOP属性值为TRUEB、该控件的TABINDEX属性值为FALSEC、该控件的ENABLED属性值为TRUED、该控件的ENABLED属性值为FALSE标准答案:D您的答案:B此题得分:0.0批注:20.第20题单选题命令按钮的标题文字由()属性来设置。
VB控制结构一、单选题1. 下面的程序运行后,显示的结果是________。
Dim x%If x Then Print x+1 Else Print xA) 1 B) 0 C)显示错误信息 D) 22. 语句If x = 1 Then y = 1, 下面说法正确的是______。
A) x = 1 和 y = 1均为赋值语句B) x = 1 和 y = 1均为关系表达式C) x = 1 为赋值语句,y = 1 为关系表达式D) x = 1 为关系表达式,y = 1 为赋值语句3. 下面分段函数 , 下面不正确的程序段是______。
A) If x >= 1 then f=sqr(x+1) B) If x >= 1 then f=sqr(x+1) f=x*x+3 If x < 1 then f=x*x +3C) If x >= 1 then f=sqr(x+1) _ D) If x < 1 then f=x*x +3 _ Else f = x*x +3 Else f=sqr(x+1)4. 计算函数的值。
, 下面程序段中正确的是______。
A)If x < 0 then y = 0 B)If x >= 2 then y = 3If x < 1 then y = 1 If x >= 1 then y = 2If x < 2 then y = 2 If x > 0 then y = 1If x >=2 then y = 3 If x < 0 then y = 0C)If x < 0 then D)If x >= 2 theny = 0 y = 3ElseIf x > 0 then ElseIf x >= 1 then y = 1 y = 2ElseIf x > 1 then ElseIf x >= 0 theny = 2 y = 1Else Elsey = 3 y = 0End If End If5. 下面的程序段,显示的结果是 ______。
国家二级VB机试(控制结构)模拟试卷15(题后含答案及解析) 题型有:1. 选择题选择题1.编写如下程序:Private Sub Commandl_Click( ) Dim m As Integer,n As Integer m=1:n=0 Do While m<20 n=m+n:m=3*m+1 Loop Print m,nEnd Sub 程序运行后,单击命令按钮Commandl,输出结果为A.40 18B.40 19C.20 64D.21 64正确答案:A解析:本题的Do循环是一个先判断条件型的循环,在循环中将循环变量m 的值每次改变。
分析循环可看出,在4次循环中m的值分别为1、4、13、40,而只有前三次循环中的m值被累规到n中,最后一次循环由于不满足m<20而跳出。
知识模块:控制结构2.下列循环中,可以正常结束的是A.i=10 Do i=i+1 Loop Until i<1B.i=1 Do i=i+1 Loop Until i=10C.i=10 Do i=i+1 Loop While i>1D.i=10 Do i=i-2 Loop Until i=1正确答案:B解析:Do循环语句的功能是:当指定的“循环条件”为真或直到指定的“循环条件”变为真之前重复执行循环体。
Do WhileIuntil…Loop循环是在条件满足的情况下才执行一次循环体,而Do…Loop while|Until循环不管是否满足条件都先执行一次循环体,然后再判断条件是否成立以决定后续操作。
本题的A选项由于i的值从10开始递增,永远不会满足i<1而无限循环;C选项由于i的值从10开始递增,永远满足i>1而无限循环;D选项由于i的值从10开始递减,但是因为每次递减2,所以i永远为偶数,不会满足i=1而无限循环。
知识模块:控制结构3.以下能够正常结束循环操作的程序段是A.i=5 Do i=i+1 Loop Until i<0B.i=5 Do i=i+2 Loop Until i=1C.i=5 Do While i>0 i=i-2 LoopD.i=0 Do While i<1 i=i-2 Loop正确答案:C解析:Do循环语句的功能是:当指定的“循环条件”为真或直到指定的“循环条件”变为真之前重复执行循环体。
控制结构一、选择题1.VB 的3种结构化程序设计的3种基本结构是________。
A) 选择结构、过程结构、顺序结构 B) 递归结构、选择结构、顺序结构 C) 过程结构、转向结构、递归结构 D) 选择结构、顺序结构、循环结构2.用If 语句表示分段函数3311()11x x f x x x ⎧-≥=⎨+<⎩ ,以下________表示方法不正确。
A) f=x^3+1If x>=1 Then f=s^3-1 B) If x>=1 Then f=x^3-1 If x<1 Then f=x^3+1 C) If x>=1 Then f=x^3-1 f=x^3+1D) If x<1 Then f=x^3+1 Else F=x^3-13.执行下面的程序段后显示结果是________。
Private Sub Form_Click() Dim mIf m Then Print m Else Print m+1 End SubA) 0 B) 1 C) ”” D) False4.设a=6,则执行x=IIf(a>5,-1,0)后,x 的值为________。
A) 5 B) 6 C) 0 D) –15.下面程序段的运行结果是________。
cj=85If cj>90 Then dj="A" If cj>80 Then dj="B" If cj>70 Then dj="C" If cj>60 Then dj="D" If cj<60 Then dj="E" Print "dj=";djA) dj=B B) dj=C C) dj=D D) dj=E6.下列语句正确的是________。
A) If K<3*N And k>N Then N=k^3 B) If K<3*N And k>N Then N=k3 C) If K<3*N : k>N Then N=k^3 D) If K<3*N And k>N Then N=k**37.设X=2.0,y=8.0,z=6.0,L=True ,则下列Visual Basic 表达式中值为True 的是________。
A) X+Z>Y AND L B) NOT(Y<Z+X)<>NOT L C) NOT L OR (L=Y+X=Z)D) Y+X>=Z+X AND (L AND FALSE)8.要判断”月收入在2000元以上(含2000元)且5000元以下(不含5000元)”的职工,应使用的逻辑表达式是________。
A) M>=2000 AND M<=5000 B) M>=2000 OR M<=5000 C) M>=2000 AND M<5000 D) M>=2000 OR M<50009.下列程序段的执行结果为________。
x=Int((69-60)*Rnd+60) Select Case x Case Is>90Print "优秀" Case 80 To 89 Print "良好" Case 60 To 79 Print "合格" Case ElsePrint "不合格" End SelectA) 优秀 B) 良好 C) 合格 D) 不合格 10.在窗体上画一个命令按钮,名称为Command1。
然后编写如下程序:运行结果________。
Private Sub Command1_Click() For I=1 To 4 For J=0 To IPrint Chr(65+I); Next J Print Next I End Sub单击命令按钮后,运行结果________。
A) BB B) ACCC BBDDDD CCCEEEEE DDDDC) B D) AACC BBBDDD CCCCEEEE DDDDD11.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer,n As IntegerFor i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNextText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是________。
A) 2 B) 3 C) 4 D) 512.在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()For i=1 To 4x=4For j=1 To 3x=3For k=1 To 2x=x+6Next kNext jNext iPrint xEnd Sub程序运行后,单击命令按钮,输出结果是________。
A) 7 B) 15 C) 157 D) 538 13.阅读下面的程序段:For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext i执行上面的三重循环后,a的值为________。
A) 3 B) 9 C) 14 D) 2114.在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i=1 To 10Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是________ 。
A)在文本框Text1中输出55B)在文本框Text1中输出0C) 出错D) 在文本框Text1中输出不定值15.有如下程序:a=10b=4For j=1 To 20 Step -2a=a+5b=b+4Next jPrint a;b运行后,输出的结果是________。
A) 10 4 B) 60 24 C) 110 44 D) 554016.有如下程序:d$=""a$="abcde"For i=Len(a) To 1 Step -1d=d+Mid(a,i,1)Next iPrint d$运行后,输出的结果是________。
A) abcde B) edcba C) acebd D) ecadb17.在Command1_Click事件程序的功能是:按顺序读入10名学生4门课程的成绩。
计算出每位学生的平均分并输出,程序如下:Dim n As Integer,k As IntegerDim score As Single,sun As Single,ave As Singlesum=0#For n=1 To 10For k=1 To 4score=InputBox("请输入一门课的成绩")sum=sum+scoreNext kave=sum/4print"第";n;"个人的平均成绩为:";aveNext n上述程序运行后结果不正确,调试中发现有一条语句出现在程序中的位置不正确。
这条语句是________。
A) sum=0# B) sum=sum+scoreC) ave=sum/4 D) print"第";n;"人的均分:";ave18.下列程序的输出结果是________。
Dim y As Integery=10While y<>0y=y-1WendPrint "y=" ; yA) y=0 B) y=1 C) y=随机值 D) y=-1 19.以下程序的输出结果是________。
Dim m As Integerm=1While m<=3m=m+1Print m;WendA) 2 B) 2 3 C) 2 3 4 D) 2 3 4 5 20.下面的程序运行结果是________。
Private Sub Form_Click()m=0Do Until 0m=m+1If m>10 Then Exit DoLoopPrint mEnd SubA) 0 B) 10 C) 11 D) 出错21.下面程序运行语句Print m执行的次数是________。
Private Sub Form_Click()Dim m As Integer,n As Integerm=0Dom=m+1For n=10 To 1 Step -3m=m+nPrint mNext nLoop While m<50End SubA) 4 B) 8 C) 12 D) 1622.在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim x As Integer,n As Integerx=1n=0Do While x<20x=x*3n=n+1LoopText1.Text=Str(x)Text2.Text=Str(n)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别是________。
A) 15和1 B) 27和3 C) 195和3 D) 600和423.在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程:Private Sub Command1_Click()x=0Do While x<50x=(x+2)*(x+3)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为________。
A) 1和0 B) 2和72 C) 3和50 D) 4和16824.在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x=0Do Until x=-1a= InputBox("请输入A的值")a=Val(a)b=InputBox("请输入B的值")b=Val(b)x=InputBox("请输入x的值")x=Val(x)a=a+b+xLoopPrint aEnd Sub程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为________。