VB函数与表达式练习题

全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行，目前处于紧张的备考阶段，以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后，VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中，VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中，要将一个窗体装载到内存进行变量初始化等预处理，但没有显示该窗体，应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段：a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。

VB简答练习题1 简述Timer控件中Interval属性和Enanbeled属性。

2 简要回答创建MDI应用程序的步骤。

3 用Visual Basic 语言编写-一个有两个整数参数m和n2的名为GetRand的Function的函数，功能是获取任意两个正整数间的随机整数(假如0<n:<m) ?4 简述selet.. .case语句执行流程。

5 引用数组元素时的注意事项有哪些?6 Visual Basic中有几种运算符?7 向文本文件中添加数据分为哪几步?8 Visual Basic 6.0中的动态数组与静态数组有何不同?9 如何创建一-个快速显示窗体?10 循环语句有几种语句?11 Shape 控件可以用来显示哪些图形?12 MDI应用程序有哪些特性?13 访问数组的常用方法有哪些?14 运行程序有哪几种方法?15 VB工程由哪几个模块组成?16 叙述VB的基本的设计机制。

17 叙述VB集成开发环境的组成。

18 叙述文件访间的类型。

19 运行程序有几种方法?20 VB 有哪些基本数据类型?21 标识符的命名规则是什么?22 访问数组的常用方法有哪些?23 VB过程参数有哪几种传递方式?有何不同?24 如何创建控件数组?25 简述For循环的语法格式。

26 通用的Sub过程有哪几种方式?27 打开属性窗口有哪几种方法?28 如何设置控件之间的对齐方式?29 简述运算符从高到低的优先顺序。

30 建立通用过程的操作步骤有哪些?31 打开代码窗口有哪几种方法?32 如何创建MDI应用程序?33 请写出随机文件的读写步骤。

34 请写出If语句的块语法格式。

35 工具箱的标准控件有哪些?36 简述创建动态数组的步骤。

37 建立事件过程有哪些方法?38 FSO对象模型包括哪些对象?答案：1．简述Timer控件中Interval属性和Enanbeled属性答：Timer控件中的Enanbeled设置或返回计时器控件的有效性，该属性值为布尔值，如果设置为True，则每经过指定的时间间隔将触发Timer事件，为False，计时器控件成为无效，停止工作。

VB常量、变量、表达式及运算、内部函数练习题(带答案)VB程序设计基础练习题（常量及变量、内部函数、表达式及运算）1．下面表达式的值是False的有：(A) “n“ "969""n97"(B) InStr("visualbasic","b")Len("basic")(C) Str(2021) "1997"(D) UCase("aBC")"aBC"2．设s1和s2都是字符串型变量，s1="Visual Basic" : s2="b"，则下列表达式中结果为True的是：(A) Mid(s1,8,1) s2(B) Len(s1)2*Instr(s1, "l")(C) Chr(66) Right(s1,4) = "Basic"(D) Instr(Left(s1,6), "a")+60 Asc(UCase(s2))3、下列为单精度变量的是（A）x$ （B）x （C）x! （D）x#4、Dim a,c As Integer，a和c的数据类型分别为(A) 都是整型(B) a是变体，b是整型(C) a是整型，b是变体5．下列函数中，返回值是字符串的有：(A) Chr (B) InStr (C) Val (D) Asc6．下列函数中，返回值不是字符串的是：(A) Trim (B) Left (C) Rnd (D) Str7．下列7个表达式中，表达式的值不是数值5或5.0的是：① Sqr(25)；② 25 ^ 0.5；③ 55 Mod 10；④ 5.5 \ 1.2；⑤ 5 *3 / 15 * 5；⑥ Abs(5 - 10)；⑦ (3 * 3 +4 * 4) ^ (1 / 2)。

VB 第二章练习三运算符及表达式一：把下面有关运算符的表格补充完整：VB算术运算符（共8个） VB关系运算符（共8个）VB布尔运算符（共6个）二：历年高考题1、符号Visual Basic 6.0规范的表达式是（）A．(a+b)(a-b) B．a2-b2C．a^2-b^2 D．[a+b]*[a-b]2、表达式14 Mod 3的值是（）A．2 B．-2 C．1 D．-13．下列各种运算符，运算级别最高的是（）（课后原题）A．关系运算符B．布尔运算符C．算术运算符D．字符串连接运算符4．假设变量a=1234，执行t=(a\100) Mod 10语句以后，t的值是（）A．1 B．2 C．3 D．45．符合Visual Basic 6.0规范的表达式是（）A．a2+ab B．a(a+b) C．a*[a+b] D．a*(a+b)6．表示x位于闭区间[-3，3] 的Visual Basic表达式是（）A．-3<=x<=3 B．x>= - 3 Or x<=3 C．x>= - 3 And x<=3 D．x>= - 3 Xor x<=37、Visual Basic 6.0的表达式分为哪几类？（5分）（课后原题）、将数学表达式sin430+e x转化成符合VB 6.0规范的表达式是（）A、(sin(43*3.1415926/180)+Exp(x))/(c+d)B、(sin(43) +Exp(x)) /(c+d)C、sin(43*3.1415926/180)+Exp(x)/(c+d)D、(sin430+e x)/(c+d)9、算术运算符、关系运算符和布尔运算符的运算优先级由高到低依次是（）A、算术运算符、布尔运算符、关系运算符B、算术运算符、关系运算符、布尔运算符C、布尔运算符、关系运算符、布尔运算符D、关系运算符、算术运算符、布尔运算符、VisualBasic6.0表达式x>=-3 And x<8表示x位于（）、[-3,8] B、（-3,8） C、[-3,8] D、（-3,8]2、表达式Int(400*Rnd())+200表示的是（）中的整数。

函数与表达式练习题一、选择题1、X=，表达式INT(X)+FIX(－X)的值是( )D.－12. 执行A＝9\4后，A的值为( 2 )4 表达式Int(8*sqr(36)*10^(-2)*10+/10的值是（）.(A) .48 (B) .048 (C) .5 (D) .054.表达式Val(".123E2CD")的值是（）.(A).123 (B) (C) 0 (D) .123E2CD5. 表达式SQR(2^3^2) MOD 7的值为( )6.表达式(7\3+1)*(18\5-1)的值是（）.(A) (B) (C) 6 (D)7.表达式5^2 Mod 25\2^2的值是（）.(A)1 (B)0 (C)6 (D)48.表达式 Mod 的值是（）.(A)1 (B)5 (C)4 (D)出错9.下面表达式中,（）的运算结果与其他三个不同.(A) Exp (B) Int+(C) -Abs (D) Sgn(100*Rnd(1))产生的随机整数的闭区间是（）.(A) [0,99] (B) [1,100] (C) [0,100] (D) [1,99]11.产生[10,37]之间的随机整数的Visual Basic表达式是（）.(A) Int(Rne(1)*27)+10 (B) Int(Rnd(1)*28)+10(C) Int(Rnd(1)*27)+11 (D) Int(Rnd(1)*28)+1112.表达式Int(Rnd(0)+1)+Int(Rnd(1)-1)的值是（）.(A) 1 (B) 0 (C) 01 (D) 213.表达式Int( - +Sgn的值是（）.(A) 18 (B)-17 (C) -18 (D) -1614.表达式Int( - +Abs的值是（）.(A) 0 (B) (C) - (D) 015.表达式Left("how are you",3)的值是（）.(A) how (B) are (C) you (D) how are you16.表达式Right("Biejing",4)的值是（）.(A) Bei (B) jing (C) eiji (D) ijin17.表达式Abs( - 5) +Len("ABCDE")的值是（）.(A) 5ABCDE (B) 0 5ABCDE (C) 10 (D) 018.表达式Mid("SHANGHAI",6,3)的值是（）.(A) SHANGH (B) SHA (C) ANGH (D) HAI19.函数Len(Str(Val("")))的值为（）.(A) 11 (B) 5 (C) 6 (D) 820.设A="",则表达式Val(Left(A,4) + Mid(A,4,2))的值为（）.(A) 123456 (B) 123445 (C) 8 (D) 621.设A="abcdefghijklm",下面（）的函数值为"jklm".(多选)(A) Mid(A,10,14) (B) Right(A,4)(C) Mid(A,10,4) (D) Left(A,10,4)22.函数InStr("VB程序设计教程","程序")的值为（）.(A) 1 (B) 2 (C) 3 (D) 423.函数Ucase(Mid("Visual basic",8,5))的值为（）.(A) Visual (B) basic (C) VISUAL (D) BASIC24.表达式Str(Len("123")) + Str的值为（）.(A) (B) 3 (C) (D)25.表达式( - 1)*Sgn( - 100 +Int(Rnd*100))的值是（）.(A) 0 (B) 1 (C) - 1 (D) 随机函数26. \2的结果是__ ___。

1. Rnd函数不可能为下列（）值（A） 0 (B) 1 (C) 0.1234 (D)0.00052. Int(198.555*100+0.5)/100的值为（）(A) 198 (B) 199.6 (C)198.56 (D)2003. Print DateAdd(“m”,1,#1/30/2000#)语句显示的结果是（）（A）00-2-29 (B)00-2-28 (C)00-2-30 (D)00-1-314. 表达式DateDiff(“y”,#12/30/1999#,#1/13/2000#)的结果是（）（A）1 (B) 11 (C)14 (D) 995. 表达式Len(“123程序设计ABC”)的值为（）（A）10 (B)14 (C)20 (D)176. 表达式LenB(“123程序设计ABC”)的值为（）（A）10 (B)14 (C)20 (D)177.赋值语句：A＝123＋MID(“1234356”,3,2) 执行后，A变量的值为（）（A）”12334” (B)123 (C) 12334 (D)1578.赋值语句：A＝123 & MID(“1234356”,3,2) 执行后，A变量的值为（）（A）”12334” (B)123 (C) 12334 (D)1579. int(-3.5),int(3.5),fix(-3.5),fix(3.5),的值分别为多少（）（）（）（）10. 表达式Ucase(Mid(“abcdefgh”,3,4))的值为（）11．在下列函数中，哪个函数的执行结果与其他三个不一样 D 。

A．String(3,”5”) B．Str(555) C．Right(“55555”,3) D．Left(“55555”,3) 12．设变量A的值为2，则哪一个函数的执行结果与其他三个不一样 A 。

A．Val(“A”) B．Int(A) C．Fix(A) D．Abs(A)13．表达式Int(-20.9)+ Int(20.9+0.5)-Fix(-17.9)的值是 C 。

函数与表达式练习题一、选择题1、X=-9.8，表达式INT(X)+FIX(－X)的值是( )A.1B.17C.0D.－12. 执行A＝9\4后，A的值为( 2 )A.9/4B.3C.2D.2.253.表达式Int(8*sqr(36)*10^(-2)*10+0.5)/10的值是（）.(A) .48 (B) .048 (C) .5 (D) .054.表达式Val(".123E2CD")的值是（）.(A).123 (B) 12.3 (C) 0 (D) .123E2CD5. 表达式SQR(2^3^2) MOD 7的值为( )A.0B.1C.2D.36.表达式(7\3+1)*(18\5-1)的值是（）.(A)8.67 (B)7.8 (C) 6 (D)6.677.表达式5^2 Mod 25\2^2的值是（）.(A)1 (B)0 (C)6 (D)48.表达式25.28 Mod 6.99的值是（）.(A)1 (B)5 (C)4 (D)出错9.下面表达式中,（）的运算结果与其他三个不同.(A) Exp(-3.5) (B) Int(-3.5)+0.5(C) -Abs(-3.5) (D) Sgn(-3.5)-2.510.Int(100*Rnd(1))产生的随机整数的闭区间是（）.(A) [0,99] (B) [1,100] (C) [0,100] (D) [1,99]11.产生[10,37]之间的随机整数的Visual Basic表达式是（）.(A) Int(Rne(1)*27)+10 (B) Int(Rnd(1)*28)+10(C) Int(Rnd(1)*27)+11 (D) Int(Rnd(1)*28)+1112.表达式Int(Rnd(0)+1)+Int(Rnd(1)-1)的值是（）.(A) 1 (B) 0 (C) 01 (D) 213.表达式Int( - 17.8) +Sgn(17.8)的值是（）.(A) 18 (B)-17 (C) -18 (D) -1614.表达式Int( - 17.8) +Abs(17.8)的值是（）.(A) 0 (B) 0.8 (C) - 0.2 (D) 0 34.815.表达式Left("how are you",3)的值是（）.(A) how (B) are (C) you (D) how are you16.表达式Right("Biejing",4)的值是（）.(A) Bei (B) jing (C) eiji (D) ijin17.表达式Abs( - 5) +Len("ABCDE")的值是（）.(A) 5ABCDE (B) 0 5ABCDE (C) 10 (D) 018.表达式Mid("SHANGHAI",6,3)的值是（）.(A) SHANGH (B) SHA (C) ANGH (D) HAI19.函数Len(Str(Val("123.4")))的值为（）.(A) 11 (B) 5 (C) 6 (D) 820.设A="12345678",则表达式Val(Left(A,4) + Mid(A,4,2))的值为（）.(A) 123456 (B) 123445 (C) 8 (D) 621.设A="abcdefghijklm",下面（）的函数值为"jklm".(多选)(A) Mid(A,10,14) (B) Right(A,4)(C) Mid(A,10,4) (D) Left(A,10,4)22.函数InStr("VB程序设计教程","程序")的值为（）.(A) 1 (B) 2 (C) 3 (D) 423.函数Ucase(Mid("Visual basic",8,5))的值为（）.(A) Visual (B) basic (C) VISUAL (D) BASIC24.表达式Str(Len("123")) + Str(77.7)的值为（）.(A) 377.7 (B) 3 77.7 (C) 80.7 (D) 12377.725.表达式( - 1)*Sgn( - 100 +Int(Rnd*100))的值是（）.(A) 0 (B) 1 (C) - 1 (D) 随机函数26. 15.5\2的结果是__ ___。

1.表达式6+10MOD4*2+1的值是（）A. 11B. 10C. 8D. 92.表达式Abs(-5)+Len(“ABCDE”)的值为( )A. -5ABCDEB. 0C. 5ABCDED. 103.关于语句行，下列说法正确的是（）A. 一行只能写一条语句B. 一条语句可以分多行书写C. 长度不能超过去了255个字符D. 每行的首字符必须大写4.在编码器中，如果一条语句太长，无法在一行内写下（不包括注释），折行书写，可以在行末使用续行字符（），表示下一行是当前行的继续A. 一个空格加一个连字符（—）B. 一个空格加一个下划字符（_）C. 一个下划字符（_）D. 直接回车5. 有如下程序段：Dim str1 As String*5Str1=“Visual Basic”当该段程序被执行完时，变量str1的值为( )A. “Visual Basic”B. “V”C. “Visual”D. “Visua”6.把数值型转换为字符型需要使用的函数是（）A. StrB. ValC. ChrD. Asc7.下列关于变量的说法不正确的是( )A. 局部变量在声明它的过程执行完毕后就被释放了B. 局部变量的作用域仅限于声明它的过程C. 静态局部变量是在过程中用Static语句声明的D. 局部变量是指那些在过程中用Dim语句或Static语句声明的变量8.如果希望以模态方式显示窗体Form1，下列正确的语句是（）A. Form1.Show 0B. Form1.ShowC. Form1.Show 1D. 以下都不正确9."x"是小于80的非负数，用VB表达式表示正确的是（)A. 0<=x<80B. 0<=x Or x<80C. 0<=x And x<80D. 0≤x<8010.在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为()A. 星号（*）B. 减号（-）C. 加号（+）D. 感叹号（！）11.可获取字符的ASCII码的函数是（）A. FixB. ChrC. valD. Asc12.以下右以作为Visual Basic变量名的是（）A. SINB. COS(X)C. X(-1)D. COL13.按照变量的作用域可将变量划分为（）A. Public、Private、ProtectedB. 全局变量、模块级变量、过程级变量C. 公有、私有、系统D. 动态、常量、静态14.要退出Do….Loop循环，可使用的语句是（）语句A. ExitB. Exit DoC. End DoD. Exit For15.Sub过程与Function过程最根本的区别是()A. Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以B. Sub过程的过程名不能返回值，而Function过程能够通过过程名返回值。

Vb专题习题一、选择题1. 将数学表达式写成Visual Basic表达式，正确的是（）（A）Sqr(abs(b*b-4ac)) （B）Sqr(abs[b*2-4*a*c])（C）Sqr(abs(b*b-4*a*c))（D）Sqr[abs(b*b-4*a*c)]2. 在Visual Basic中，若要将窗体中某个命令按钮设置成无效状态，应对该按钮的（）属性值进行修改。

（A）Value （B）Visible （C）Enabled （D）Caption3. 执行如下Visual Basic程序段时，出现了如下图所示的错误：Private Sub Command1_Click()Dim a As Integer, b As Integera = 5:b = 8b = a + blabel1.Caption = Str(b)End Sub引发此错误的语句可能为（）（A）Dim a As Integer, b As Integer（B）a = 5: b = 8（C）b = a + b（D）label1.Caption = Str(b)4. 已知a=5，b=9，c=11，则下列Visual Basic表达式的值为False的是（）（A）a > b And a > c（B）a < b Or a > c（C）a < b + c （D）a > c – b5. 有下列Visual Basic程序段：某同学正编写一个判断两数大小的程序，其窗体和代码窗口如下图所示：根据代码窗口中的程序，要在程序运行时判断两数的大小，窗体上必须增加的对象是（）（A）标签Text1（B）文本框Text2（C）命令按钮Command1（D）文本框Print若程序要实现“求100内能被3整数的自然数个数”的功能，则方框中正确的语句是（）（A）i / 3 = 0（B）i mod 3 = 0（C）i \ 3 = 0（D）int(i/3) = 06. 有如下Visual Basic程序段：Private Sub Command1_Click()Dim a As Integera = Int(5 * Rnd + 1) * Int(5 * Rnd - 1)Print aEnd Sub执行程序后，a的值范围是（）（A）[0，15] （B）[－1，15] （C）[－4，15] （D）[－5，15]7.在Visual Basic中，表达式3 ^ 2 Mod 14 \ 2 ^ 3的值是（）（A）1 （B）0 （C）2 （D）38. 某同学正编写一个判断两数大小的程序，其窗体和代码窗口如下图所示：根据代码窗口中的程序，要在程序运行时判断两数的大小，窗体上必须增加的对象是（）（A）标签Text1（B）文本框Text2（C）命令按钮Command1（D）文本框Print9. 下列Visual Basic程序段中，能实现输出变量a、b、c三个数中最大数的是（）10、有如下Visual Basic程序段：x = 3y =5Text1.Text = "x+y"该程序运行后，要文本框Text1中显示的是（）（A）3+5（B）x+y（C）8（D）3+5=811.在Visual Basic中，下列表达式的值为5的是（）（A）Int(Sqr(9) + 1.28)（B）(19 \ 2) Mod 5（C）Abs(-7) + Sqr(4)（D）Len("x+y+2")12.在Visual Basic中，下列语句定义的数组元素为10个的是（）（A）Dim a(0 To 10) As Integer（B）Dim b(1 To 9) As String（C）Dim c(2 To 10) As Boolean（D）Dim d(0 To 9) As Date13.某Visual Basic工程的代码窗口如图所示：从图中可以看出，当前正在编辑的是（）A. Command1的Click事件过程代码B. Timer1的Timer事件过程代码C. Label1的Click事件过程代码D. Image1的Click事件过程代码14. 在Visual Basic中，下列能作为变量名的是（）A. MyB. IfC. a+yD. 2nd15. 已知字符A～Z的ASCII码值分别对应65～90。

VB基本运算与表达式练习题VB数据类型、函数、基本运算与表达式练习题1.要定义一个可存储数值－7.283的变量，其合适的类型是() A．Integer B．Long C．Single D．Boolean2.下列VB表达式中：①Sin(x)②Text1.Text③Label1.Caption④Chr(x)⑤Asc(x)值为字符串型的是()A.①③⑤B.①②③C.②④⑤D.②③④3.在Visual Basic中，用变量p存储货物编码(如“0188901190”，其中每二位数字都代表相应的含义)，则合适的数据类型应定义为() A．Single B．LongC．String D．Boolean4.有如下程序段：x＝1：y＝2p＝Not(x＋y＝3)p的数据类型、该程序段运行后值分别是()A．Integer11B．Long11C．Boolean False D．Boolean True5.在VB中，下列属于字符串常量的是()A．”100”B．25C．Hello D．true6.下列选项中不是字符串常量的是()A．”ab”B．zhejiangC．”2006”D．”你好”7.以下符号常量的定义，错误的是()A.Const Pi＝3.14B.Const LimitMode＝”1年期试用”C.Const found＝TrueD.Const next＝世博欢迎你8.下列可以作为VB变量名的是()A.3x B．x－1C．if D．x_19.下列可作为Visual Basic变量名的是()A．Len B．Sqrter C．93edu D．dim10.在Visual Basic中，下列变量定义错误的是()A．Dim a_1as SingleB．Dim True as BooleanC．Dim b123as stringD．Dim xyz as integer11.已知某校100名学生的体重数据(包含一位小数)，要求编写VB 程序，统计超过平均体重的人数。

1．下面选项内不属于描述面向对象程序设计特征的名词是( )A．继承性B．多态性C．连续性D．封装性2．VB中数据类型Boolean表示布尔型，布尔型变量占( )字节。

A．4 B．3 C．2 D．13．表达式Cint(13.2/2)的结果是( )A．6.5 B．6 C．7 D．54．表达式Len(String(6, "9"))的值是( )A．9 B．6 C．999999 D．出错5．要在窗体上仅显示文字，选用( )控件最合适A．LABEL B．TEXTBOX C．COMMANDBUTTON D．IMAGE6．从编写到运行一个完整的程序的流程是( )。

A．编译程序、运行程序B．编译程序、测试程序、运行程序C．编写程序、编译程序、运行程序D．需求分析、编译程序7．关于结构化程序设计的思想方法，下列选项中不属于其核心思想的是( )。

A．自顶向下B．逐步求精C．模块化D．可复用8．下列关于算法的特征描述不正确的是( )A．有穷性：算法必须在有限步之内结束B．确定性：算法的每一步必须有确切的含义C．输入：算法至少有一个输入 D．输出：算法至少有一个输出9．下面属于结构化程序设计的基本方法的是( )A．筛选法B．递归法C．归纳法D．自顶向下10．在VB中，表达式Mid("程序设计",2,2)的结果是( )A．程B．序C．序设D．出错11．以下不是描述算法的方法有( )A．自然语言B．流程图C．伪代码D．E-R图12．在VB中，表达式Mid("程序设计",2)的结果是( )A．程序B．序C．序设计D．出错13．下列程序，当单击窗体时s的值是( )Private Sub Form_Click()Dim s as booleana = 2:b = 3:c = 4:d = 5s = a > b And 2 * a > c Or c <= dPrint sEnd SubA．TRUE B．FALSE C．-1 D．114．在VB中，不能作为变量名的是 ( )A．中国B．STRING C．b_q D．a_b15．在VB程序中，假定有以下循环结构, 则正确的描述是( )Do While条件循环体LoopA．如果"条件"是一个为0的常数，则一次循环体也不执行B．如果"条件"是一个为0的常数，则执行无穷次循环体C．如果"条件"是一个为0的常数，则至少执行一次循环体D．不论"条件"是否为"真"，至少执行一次循环体16．以下哪个不是程序设计高级语言( ) [后面还有2个类似的题目，要了解每个选项]A．VC B．Pascal C．C++ D．CSS17．在VB程序中有以下程序段，语句Print "VB"的执行次数是( )For i=1 To 3For j=3 To 1 Step -1Print "VB"Next jNext iA．3 B．4 C．6 D．918．在VB中，表达式Cos(0)的结果是( )A．0 B．1 C．约等于3.14 D．出错19．在使用流程图描述算法中，表示变量的计算与赋值的符号框为( )A．矩形框B．菱形框C．平行四边形框D．椭圆形框20．在VB中，以下关于变量定义错误的是( )A．Dim a As Integer B．Public a As String C．Private a As Boolean D．Dim a Integer 21．在VB中，表达式Sgn(-5.8)的结果是( )A．-5.8 B．-5 C．-6 D．-122．已知f(1)=1，f(2)=2，当n≥3时，f(n)= f(n-1)+f(n-2)，编程求f(100)的值，应选择的算法为( ) A．解析法B．穷举法C．递归法D．冒泡排序法23．下面说法正确的是( )A．算法+数据结构=程序设计 B．算法就是程序 C．数据结构就是程序D．算法包括数据结构24．穷举法的适用范围是( )A．一切问题B．解的个数极多的问题C．解的个数有限且可一一列举 D．设计算法25．在VB中，表达式Log(100)的结果是( )A．1 B．2 C．10 D．以上都不是26．如果设计的程序需要播放Mp3音乐或avi视频文件，可用控件( )A．label B．textbox C．mediaplayer D．data27．表达式Asc("A")的结果类型是( )A．数值型B．日期型C．布尔型D．字符型28．程序运行后，要按指定的时间间隔重复自动执行某段代码，可用控件( )A．Label B．textbox C．timer D．image29．如果设计的程序需要与数据库进行连接，可用控件( )A．label B．textbox C．timer D．data30．在VB程序中，下列哪个程序行是正确的( )A．x-5=y B．a+b=c C．y=1:y=y+1 D．i=5;i=i+131．在软件开发中有许多重要的环节，下列叙述中正确的是( )A．软件维护只包括对程序代码的维护B．程序调试后一般不需要再测试C．软件测试应该由程序开发者来完成D．需求分析与程序设计、测试、维护是软件开发中的重要环节32．如果把一个人当作对象，那么血型相当于这个对象的( )A．属性B．方法C．事件D．过程33．算法是解决问题的步骤序列，正确的序列是( )①分析问题；②提出问题；③设计算法A．②①③B．①②③C．①③②D．②③①34．不论多么复杂的程序，在程序设计中都可以归为( )等三种基本控制结构的组合。

计算机二级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训练题及答案】。

1.输入3个数,输出最大的数2.有一元二次方程：aX2+bX+c=0,依次输入a,b,c,判断此方程是否有实根3.输入一个百分制的成绩,若大于等于60,则用消息框弹出,显示“恭喜成绩通过”,若小于60,则弹出消息框,显示“抱歉成绩没有通过”4.输入一年份,判断它是否为闰年,并显示有关信息;判断闰年的条件是：年份能被4整除但不能被100整除,或者能被400整除5.输入学生的百分制成绩,转换输出为五级制成绩,90～100分转换为优秀,80～89转换为良好,70～79转换为中等,60～69转换为及格,0～60转换为不及格;6.随机产生一个三位正整数,然后逆序输出,产生的数与逆序数同时显示;例如,产生246,输出是642;7.输入两个整数,求它们的最大公约数;8.编程求200--400范围内5的倍数或7的倍数之和;一个数如果同时是7和5的倍数,则只能加一次;;9.计算100~300之间所有能被3和7整除的数之和10.分别统计1-100中,满足3的倍数、7的倍数的数各有多少;11.某次歌曲大奖赛,有7个评委;如果分别输入7个评委对某个参赛者的打分数,按照去掉一个最高分和一个最低分的计算办法,求出该参赛者的平均得分;12.输入一串字符,统计其中字母A不区分大小写出现的次数;13.我国目前有13亿人口,按人口年增长率%计算,多少年后我国人口将超过26亿;14.小猴有桃若干,第一天吃掉一半多一个；第二天吃剩下桃子的一半多一个；以后每天都吃尚存桃子的一半多一个,到第7天只剩一个,问小猴原有桃多少15.16.求100以内的素数17.百元买百鸡问题;假定小鸡每只5角,公鸡每只2元,母鸡每只3元,编程求解购鸡方案;18.编程求斐波那契数列前11项;斐波那契数列：F0=f1=1, Fn=Fn-1+Fn-2 n>=219.将输入的字符串以反序显示;例如：输入“ASDFGT”,显示“TGFDSA”20.随机产生10个30,100内的整数,求最大值及所对应的下标21.随机产生10个30,100内的整数,求最大值、最小值和平均值;22.随机产生10个30,100内的整数,求最小值及所对应的下标;23.随机生成一个整型的二维数组,范围在10,20之间,以下三角形式输出该数组;24.随机产生10个1~100的正整数放入数组,显示产生的数,求最大值、最小值、平均值;25.利用随机函数生成一个4×4的矩阵即二维矩阵,范围是20,50内的整数,输出该矩阵所有数据之和26.已知有序数组a,编程插入xx的值为14;数组a中的元素分别为{12,6,4,89,75,63,100,20,31};27.编写一函数,计算Double类型一维数组所有元素的平均值;28.用函数过程求表达式1+1/2+1/3+1/4+…+1/n的和.29.编一子过程ProcMin,求一维数组a中的最小值,子过程的形参自己确定;30.编一个函数,求一维数组a中的最大值,函数的形参自己确定;31.编写一个过程计算并输出区间100,1000内所有素数的和要求判断素数使用过程函数或子过程来实现;调用该过程;提示：只能被1和自身整除的自然数称为素数;注：本答案第一行代码应在题目之后,自行调整Private Sub Command11_Click'1. 输入3个数,输出最大的数Dim max%X1 = ValInputBox"input"X2 = ValInputBox"input"x3 = ValInputBox"input"max = X1If max <= X2 Thenmax = X2End IfIf max <= x3 Thenmax = x3End IfMsgBox "3个数之中的最大数max=" & maxEnd SubPrivate Sub Command12_Click'2. '有一元二次方程：aX2+bX+c=0,依次输入a,b,c,判断此方程是否有实根a = ValInputBox"input"B = ValInputBox"input"c = ValInputBox"input"s = B ^ 2 - 4 a cIf a <> 0 ThenIf s = 0 ThenMsgBox "两个相等实根"ElseIf s > 0 ThenMsgBox "两个不相等实根"ElseIf s < 0 ThenMsgBox "两个不相等虚根"End IfElseMsgBox " 无解"End IfEnd SubPrivate Sub Command13_Click'3. 输入一个百分制的成绩,若大于等于60,则用消息框弹出,显示"恭喜成绩通过",若小于60,则弹出消息框,显示"抱歉成绩没有通过"X = ValInputBox"input"If X >= 60 ThenMsgBox "恭喜成绩通过"ElseMsgBox "抱歉成绩没有通过"End IfEnd SubPrivate Sub Command14_Click'4. 输入一年份,判断它是否为闰年,并显示有关信息;判断闰年的条件是：年份能被4整除但不能被100整除,或者能被400整除yes = ValInputBox"year"If yes Mod 4 = 0 And yes Mod 100 <> 0 Or yes Mod 400 = 0 ThenMsgBox yes & "是闰年"ElseMsgBox yes & "不是闰年"End IfEnd SubPrivate Sub Command15_Click'5. 输入学生的百分制成绩,转换输出为五级制成绩,90～100分转换为优秀,80～89转换为良好,70～79转换为中等,60～69转换为及格,0～60转换为不及格;score = ValInputBox"input"Select Case scoreCase Is >= 90MsgBox "优秀"Case Is >= 80MsgBox "良好"Case Is >= 70MsgBox "中"Case Is >= 60MsgBox "及格"Case ElseMsgBox "不及格"End SelectEnd SubPrivate Sub Command16_Click'6. 随机产生一个三位正整数,然后逆序输出,产生的数与逆序数同时显示;例如,产生246,输出是642;a = "645"n = LenaFor i = 1 To Intn / 2c = Mida, i, 1Mida, i, 1 = Mida, n - i + 1, 1Mida, n - i + 1, 1 = cNext iMsgBox aEnd SubPrivate Sub Command1_Click'7. 输入两个整数,求它们的最大公约数m = ValInputBox"input m值"n = ValInputBox"input n值"If n > m Thent = nn = mm = tEnd Ifr = m Mod nDo While r <> 0m = nn = rr = m Mod nLoopMsgBox "最大公约数=" & nEnd SubPrivate Sub Command2_Click'8. 编程求200--400范围内5的倍数或7的倍数之和;一个数如果同时是7和5的倍数,则只能加一次; Dim sum1%, sum2%sum1 = 0: sum2 = 0For i = 200 To 400If i Mod 5 = 0 Thensum1 = sum1 + iElseIf i Mod 7 = 0 Thensum2 = sun2 + iEnd Ifi, sum1, sum2Next iMsgBox "5 的倍数之和sum=" & sum1MsgBox "7 的倍数之和sum=" & sum2End SubPrivate Sub Command3_Click'9. 计算100~300之间所有能被3和7整除的数之和Dim sum%sum = 0For i = 100 To 300If i Mod 3 = 0 And i Mod 7 = 0 Thensum = sum + iEnd IfNext iMsgBox "sum=" & sumEnd SubPrivate Sub Command4_Click'10. 分别统计1-100中,满足3的倍数、7的倍数的数各有多少m = 0: n = 0For i = 1 To 100If i Mod 3 = 0 Thenn = n + 1ElseIf i Mod 7 = 0 Thenm = m + 1End IfNext iMsgBox "3的倍数个数=" & nMsgBox "7的倍数个数=" & mEnd SubPrivate Sub Command5_Click'11. 某次歌曲大奖赛,有7个评委;如果分别输入7个评委对某个参赛者的打分数,按照去掉一个最高分和一个最低分的计算办法,求出该参赛者的平均得分Dim sum%, max%, min%sum = 0: max = 0: min = 999For i = 1 To 7X = ValInputBox"input"If max <= X Thenmax = XEnd IfIf min >= X Thenmin = XEnd Ifsum = sum + XNext iAvg = sum - max - min / 5MsgBox "最高分=" & maxMsgBox "最低分= " & minMsgBox "总和=" & sumMsgBox "平均分=" & AvgEnd SubPrivate Sub Command10_Click'12. 输入一串字符,统计其中字母A不区分大小写出现的次数;Dim ch As Stringch = "ASDEAS"n = 0For i = 1 To Lenchst = Midch, i, 1If UCasest = "A" Thenn = n + 1End IfNext iMsgBox "字符串中出现A字符的系数" & nEnd SubPrivate Sub Command6_Click'13. 我国目前有13亿人口,按人口年增长率%计算,多少年后我国人口将超过26亿;n = 0X = 13Do While X <= 26X = Xn = n + 1LoopMsgBox nEnd SubPrivate Sub Command7_Click'14. 小猴有桃若干,第一天吃掉一半多一个；第二天吃剩下桃子的一半多一个；以后每天都吃尚存桃子的一半多一个,到第7天只剩一个,问小猴原有桃多少X = 1For i = 6 To 1 Step -1X = X + 1 2Next iMsgBox XEnd SubPrivate Sub Command8_Click'15. 求100以内的素数For i = 1 To 100flag = 1For j = 2 To i - 1If i Mod j = 0 Thenflag = 0End IfNext jIf flag = 1 ThenMsgBox i & "是素数"End IfNext iEnd SubPrivate Sub Command9_Click'16. 百元买百鸡问题;假定小鸡每只5角,公鸡每只2元,母鸡每只3元,编程求解购鸡方案; n = 0For X = 0 To 33For y = 0 To 50z = 100 - X - yIf 3 X + 2 y + z = 100 ThenPrint X, y, zEnd IfNext yNext XEnd SubPrivate Sub Command20_Click'17. 编程求斐波那契数列前11项;斐波那契数列：F0=f1=1, Fn=Fn-1+Fn-2 n>=2Dim f11 As Integerf0 = 1f1 = 1For i = 2 To 10fi = fi - 1 + fi - 2Next iFor i = 0 To 10Print fi;Next iEnd SubPrivate Sub Command21_Click'18. 将输入的字符串以反序显示;例如：输入"ASDFGT",显示"TGFDSA" Dim s10 As StringFor i = 0 To 9si = InputBox"input"Next iFor i = 9 To 0 Step -1Print siNext iEnd SubPrivate Sub Command22_Click'19. 随机产生10个30,100内的整数,求最大值及所对应的下标Dim a10 As Integer, max%For i = 0 To 9ai = IntRnd 71 + 30Next imax = a0maxi = 0For i = 1 To 9If ai >= max Thenmax = aimaxi = iEnd IfNext iMsgBox "max=" & maxMsgBox "maxi=" & maxiEnd SubPrivate Sub Command23_Click'20. 随机产生10个30,100内的整数,求最大值、最小值和平均值;Dim a10 As Integer, max%, min%For i = 0 To 9ai = IntRnd 71 + 30Next imax = a0min = a0For i = 1 To 9If ai >= max Thenmax = aiElsemin = aiEnd Ifsum = sum + aiNext iMsgBox "max=" & maxMsgBox "min=" & minMsgBox "avg=" & sum / 10End SubPrivate Sub Command17_Click'21. 随机产生10个30,100内的整数,求最小值及所对应的下标;Dim a10 As IntegerFor i = 0 To 9ai = IntRnd 71 + 30Next imin = a0Mini = 0For i = 1 To 9If ai <= min Thenmin = aiMini = iEnd IfNext iMsgBox "min=" & minMsgBox "mini=" & MiniEnd SubPrivate Sub Command18_Click'22. 随机生成一个整型的二维数组,范围在10,20之间,以下三角形式输出该数组;Dim a10, 10 As IntegerFor i = 0 To 9For j = 0 To 9ai, j = IntRnd 11 + 10Next jNext iFor i = 0 To 9For j = 0 To iPrint ai, j,Next jPrintNext iEnd SubPrivate Sub Command19_Click'23. 随机产生10个1~100的正整数放入数组,显示产生的数,求最大值、最小值、平均值;Dim a10 As Integer, max%, min%For i = 0 To 9ai = IntRnd 100 + 1Print aiNext imax = a0min = a0For i = 1 To 9If ai >= max Thenmax = aiElsemin = aiEnd Ifsum = sum + aiNext iMsgBox "max=" & maxMsgBox "min=" & minMsgBox "avg=" & sum / 10End SubPrivate Sub Command24_Click'24. 利用随机函数生成一个4×4的矩阵即二维矩阵,范围是20,50内的整数,输出该矩阵所有数据之和Dim a4, 4 As IntegerDim sum%, i%, j%For i = 0 To 3For j = 0 To 3ai, j = IntRnd 31 + 20sum = sum + ai, jNext jNext iFor i = 0 To 3For j = 0 To 3Print ai, j,Next jPrintNext iMsgBox "sum=" & sumEnd SubPrivate Sub Command25_Click'25. 已知有序数组a,编程插入xx的值为14;数组a中的元素分别为{12,6,4,89,75,63,100,20,31};Dim a, iMin%, n%, i%, j%, t%a = Array2, 6, 4, 89, 75, 63, 100, 20, 31X = 14n = UBounda ' 获得数组的下标上界For i = 0 To n - 1 ' 进行n-1轮比较iMin = i ' 对第i轮比较时,初始假定第i个元素最小For j = i + 1 To n ' 在数组i+1～n个元素中选最小元素的下标If aj < aiMin Then iMin = jNext jt = ai ' i+1～n个元素中选出的最小元素与第i个元素交换ai = aiMinaiMin = tNext iFor k = 0 To n ' 查找欲插入数x在数组中的位置If X < ak Then Exit ForNext kReDim Preserve an + 1 ' 数组增加一个元素For i = n To k Step -1 ' 数组元素后移一位,腾出位置ai + 1 = aiNext iak = XFor i = 0 To n + 1Print ai;NextEnd SubPrivate Sub Command26_Click'26. 编写一函数,计算Double类型一维数组所有元素的平均值;Dim a, n%, sa = Array1, 4, 7, 9, 12, 23, 56n = UBoundas = sum1aMsgBox "sum=" & sMsgBox "avg=" & s / nEnd SubPrivate Sub Command27_Click'27. 用函数过程求表达式1+1/2+1/3+1/4+…+1/n的和.n = InputBox"INPUT"s = sum2nMsgBox "SUM2=" & sEnd SubPrivate Sub Command28_Click'28. 编一子过程ProcMin,求一维数组a中的最小值,子过程的形参自己确定Dim a, n%, min%a = Array1, 4, 7, 9, 12, -23, 56n = UBoundaCall procmina, minMsgBox "min=" & minEnd Sub'28. 编一子过程ProcMin,求一维数组a中的最小值,子过程的形参自己确定Private Sub Command1_ClickDim a, n%, min%a = Array1, 4, 7, 9, 12, -23, 56n = UBoundaCall procmina, minMsgBox "min=" & minEnd SubPrivate Sub Command29_Click'29. 编一个函数,求一维数组a中的最大值,函数的形参自己确定;Dim a, n%, sa = Array1, 4, 7, 9, 12, 23, 56n = UBoundas = maxaMsgBox "max=" & sEnd SubPrivate Sub Command30_Click'30. 编写一个过程计算并输出区间100,1000内所有素数的和要求判断素数使用过程函数或子过程来实现;调用该过程;提示：只能被1和自身整除的自然数称为素数;Dim i%, sum, f%sum = 0For i = 100 To 1000Call procsi, fIf f = 1 Thensum = sum + iEnd IfNext iMsgBox "sum=" & sumEnd Sub。

习题2（程序设计入门）一、选择题1．如果把一个人当作对象，那么血型相当于这个对象的：A(A) 属性(B) 方法(C) 事件(D) 特征2．下列哪一种方法不能改变窗体的大小：A(A) 设计时在窗体布局窗口中进行调整(B) 设计时在属性窗口中设置相应的属性(C) 运行时设置相应属性的值(D) 运行时调用窗体的Move方法3．一个对象可以执行的动作和可被对象识别的动作分别称为：B(A) 事件、方法(B) 方法、事件(C) 属性、方法(D) 过程、事件4．在窗体Form1的Click事件过程中有以下语句：Label1.Caption = "Visual Basic"若本语句执行之前，标签控件Label1的Caption属性为默认值，则标签控件的Name 属性和Caption属性在执行本语句之前的值分别为：A(A) "Label"、"Label" (B) "Label"、"Caption"(C) "Label1"、"Label1" (D) "Caption"、"Label"5．见上题。

该语句执行后，标签控件的Name属性和Caption属性的值分别为：B(A) "Label"、"VisualBasic" (B) "Label1"、"Visual Basic"(C) "Label1"、"Caption" (D) "Label"、"Label1"6．下面哪种对象没有Caption属性：B(A) Form (B) TextBox (C) CommandButton (D) Label7．文本框对象的默认属性是：B(A) Name (B) Text (C) Visible (D) Enabled8．Visual Basic源程序的续行符是：D(A) 单引号(B) 双引号(C) 冒号(D)空格与下划线9．下面的动作中，不能引发按钮Click事件的是：B(A) 在按钮上单击鼠标左键(B) 在按钮上单击鼠标右键(C) 把焦点移至按钮上，然后按回车键(D) 如果按钮有快捷字母，按“Alt+该字母”二、判断题1．标签控件是专门用来显示信息的，所以不能响应鼠标的单击事件。

实验作业程序设计基础2实验目的1、掌握VB的基本数据类型，变量、常量的定义格式。

2、掌握运算符和表达式的表示方法。

实验要求1、选择题，填空题、运行结果题、转换题标明题号，答案写在实验报告上。

2、程序设计题中的第2题要求把事件代码写在实验报告上。

3、程序设计题单建一个文件夹，以学号和姓名命名，压缩后上交到ftp服务器上。

实验内容一、选择题1.表达式25.28 Mod 6.99的值是[ B ]。

（A）1 （B）5 （C）4 （D）出错2.表达式5 ^ 2 Mod 25 \ 2 ^ 2的值是[ D ].（A）1 （B）0 （C）6 （D）43.表达式( 7 \ 3 + 1) * (18 \ 5 - 1)的值是[ A ]。

（A）8.67 （B）7.8 （C）6 （D）6.674.要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句[ B ]。

（A）Option Base 0 （B）Option Explicit（C）Option Base 1 （D）OptionCompare5.表达式Int(-20.9)+Int(20.9+0.5)-Fix(-17.9)的值为__C____A.-17B.16C.17D.186.如果a,b,c的值分别为3,2,-3,则下列表达式的值是______Abs(b+c)+a*Int(Rnd+3)+Asc(Chr(65+a))A.10B.68C.69D.787.设m=”morning”,下列______表达式的值是”mor”BA.Mid(m,5,3)B.Left(m,3)C.Right(m,4,3)D.Mid(m,3,1)8.如果x是一个正实数，对x的第三位小数四舍五入的表达式是__A____A.0.01*Int(100*x+0.5)B.0.01*Int(10*x+0.5)C.0.01*Int(x+0.5)D.0.01*Int(x+5)9.求一个三位正整数n的十位数的方法是___A___A.Int(n/10)- Int(n/100)*10B. Int(n/10)- Int(n/100)C.n-Int(n/100)*10D. Int(n-Int(n/100)*1010.返回删除字符串前导和尾随空格符后的字符串，用函数 A 。

vb课后练习答案习题解答（2）第2章基本数据类型与表达式2．1 填空题1．程序设计语言中（）是语言的最基本符号，（）是具有语法意义的最小语法单位。

答案：字符、单词2．（）用于标记用户自定义的常量、类型、变量、控件、过程、函数等名字。

答案：标识符3．整型数据占（）字节的内存空间。

长整型数据占（）个字节的内存空间。

单精度浮点型数据占（）个字节的内存空间。

双精度浮点型数据占（）个字节的内存空间。

日期型数据占（）个字节的内存空间。

答案：2、4、4、8、84．100% 表示100为（）型数据；100！表示100为（）型数据；100＠表示100为( )型数据.答案：整、单精度浮点、货币5．符号常量在某一过程中说明，则该符号常量只能在（）内有效。

答案：该过程内6．若一个整型变量说明了之后没有给它赋值，则它的值为（）。

答案：07．在VB中可以把类型说明符放在变量名的（）来说明变量的类型。

答案：末尾8．为了使VB的编译程序自动检查变量声明，遇到未经说明的标识符发出错误警告信息，在程序中要加上（）语句。

答案：Option Explicit9．对含有多种运算的表达式，各种运算之间的顺序为（）→（）→（）→（）。

答案：函数运算、算术运算、关系运算、逻辑运算10．把1234.567的小数部份四舍五入转换为整数，可使用函数（）。

答案：Cint(1234.567)11．将x四舍五入到百位（例如，若x=23874.52应舍入成23900），可使用表达式（）。

答案：Int(x / 100 + 0.5) * 10012．将x从十位截断（例如，x=23874.52应截成23800）可使用表达式（）。

答案：Fix(x / 100) * 100或者Int(x/100)*100或者Cint(x\100-0.5)*10013．设X为数值变量，求X的常用对数可使用的表达式是（）。

答案：Log(X)/Log(10)14．要从字符串“Visual BASIC 6.0”中截取子字符串“BASIC”可使用函数（）。

浙江省高中信息技术选考加试题VB专项练习题六及答案1.下列可作为VB变量名的是：（A）a\b（B）False（C）cos（D）sum正确答案：AVB变量名只能由字母、数字和下划线组成，且不能以数字开头，因此只有选项A符合要求。

2.在VB语句dim s(9) as integer中，数组s的变量个数和类型是：（A）9整型（B）10整型（C）9单精度型（D）10单精度型正确答案：Adim s(9) as integer定义了一个包含10个元素的整型数组，因此选项A正确。

3.将数学表达式x2≤y+z写成VB表达式，正确的是：sqr(x)≤y+z（B）x2≤y+z（A）（C）x^2<=y+z（D）x^2≤y+z正确答案：DVB中乘方运算符为^，而不是2，因此选项D正确。

4.VB表达式val(mid(str(3.5),2,1))的值是：（A）1（B）2（C）3（D）5正确答案：Bstr(3.5)将3.5转换为字符串"3.5"，mid(str(3.5),2,1)取出字符串中第2个字符，即"."，val(".")的值为0，因此选项B正确。

5.VB语句Text1.text="浙江省"用于在文本框中显示文字“浙江省”，该语句中的"text"是：（A）类名（B）对象名（C）属性名（D）属性值正确答案：CText1是对象名。

text是文本框控件的属性名，因此选项C正确。

6.VB语句fix(rnd*6)+1所产生数的范围(小括号表示边界值不能取到，中括号表示边界值能取到)是：（A）[2，6]（B）(1，5)（C）[1，6]（D）(2，5)正确答案：Crnd函数返回0到1之间的随机数，乘以6后取整，得到0到5之间的整数，加1后得到1到6之间的整数，因此选项C正确。

7.某VB程序代码如下：a = 3b = 4c = 5If a。

VB第四章练习（二）VB第四章练习（二）（有正确答案的）一、填空题1设 a=2,b=3，表达式 a>b 的值是_______。

FALSE|0|零|假|假值|零值 2．在VB中声明静态变量的关键字是_______。

static 3．在VB中声明符号常量的关键字是_______。

const 4．表达式10 MOD 16\\4的值是_______。

25．设A=5，B=6，C=7，D=8，表达式3>2*B OR A=C AND B<>C OR C>D的值是_______。

False|0|零|假|假值|零值6．设a=6，b=3，c=5，则表达式Not a>c And c=b Or b<>a+c 的值为_______。

True|真|真值|-18．设a=1,b=2,c=3,则VB6.0表达式：a9．x是小于120的非负数，描述该条件的布尔（逻辑）表达式是_。

x<100 and x>=0|x>=0 and x<100|（x<100）and (x>=0)|(x<100) and x>=0|x<100 and (x>=0)|(x>=0) and(x<100)|(x>=0) and x<100| x>=0 and (x<100)10．在VB中，用 Dim X As Integer 语句定义的变量X，系统默认其值为_______。

0|零 11．表示x是5的倍数VB表达式为_______。

X MOD 5=0|x/5=int(x/5)|int(x/5)=x/5 12．已知 a=3.5,b=5.0,c=2.5,d=True 则表达式：a>=0 AND a+c>b+3 OR NOT d 的值是____。

False|0|零|假|假值|零值13．用于声明全局变量的关键字是_______。