大一VB语言程序期末考试题及答案

1、大一VB语言程序设计期末考试题一、选择题1 下列常量中，是Integer类型常量的是（ C )。A、123& B、38844 C、123% D、327682 下面选项中()是字符连接运算符。( A ）A、B、AndC、D、Mod3 下面关于VB的集成开发环境(IDE）的叙述中，不正确的是（ B )。A、IDE是设计、调试、运行VB程序的工具。 B、用户不能随意关闭IDE中的窗口。C、”窗体设计 窗口是用来设计应用程序界面（窗体）的。 D、打开 / 关闭各窗口的命令主要在IDE的视图菜单中。4 len（“vb程序设计)=（ C ） 。A、 5 B、2 C、 6D、10 5 表达式 15 Mod

2、4 + 13 5 2 的值是 DA、7B、0C、2D、46 赋值语句 A=123 + Mid$（ “123456”，3，2) 执行后，A=（ A ）。A、157B、12334C、123 D、12334 7 在一个语句内写多条语句时，用来分隔每条语句的符号是(C）。A、，B、;C、:D、8 将逻辑型数据转换成整型数据时，转换规则是（ D ）。A、将True转换为 1 ,将False转换为 0B、将True转换为 1 ，将False转换为 -1 C、将True转换为 0 ，将False转换为 1D、将True转换为 -1 ，将False转换为 0 9 表达式2+345SIN（X+1)/2中最先进行

3、的运算是(D）。A、SINB、45C、3*4D、x+110 如果x=2,则表达式x+12 Or sin（x)0。9 And 3x+3的值（ B )。A、不能计算B、 True C、5D、False11 随机产生 10，50 之间整数的正确表达式是( D ）。 A、Round( Rnd*50) B、 Int（Rnd*40+10)C、Round( Rnd51） D、 10+Int(Rnd41)12 每建立一个窗体,工程管理器窗口中就会增加一个（C).A、类模块文件B、工程文件C、窗体文件D、程序模块文件13 INT(100RND(1）产生的随机整数的闭区间是（B）。A、1，100B、0,99C、0

4、，100D、1，9914 下列数据类型中,占用内存最小的是(D).A、IntegerB、SingleC、BooleanD、Byte15 VisualBasic是一种()程序设计语言。BA、过程式B、非过程式C、机器D、低级16 函数Int(10Rnd)是在（A）范围内的整数。 A、0，9B、0,1C、1,9D、1，1017 以下合法的一组Visual Basic用户标识符是 CA、Sum 和 8abcB、a#x 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile18 函数Len（Str（Val(”123。4）)）的值为(B）.A、5B、6C、8D、1119 Int(1

5、98。555*100+0.5）/100的值为BA、199。6B、198。56C、200D、19820 以下各表达式中, 计算结果为0的是（A）。A、FIX(12.4)+FIX(-12。6)B、CINT（12。4）+CINT(-12.6）C、INT(12。4)+INT（12.6)D、FIX(13。6）+FIX（-12。6)21 MsgBox()的正确语法是( D ）。A、 MsgBox（标题 ，提示信息 ，按钮类型）B、 MsgBox（提示信息，标题 ，按钮类型）C、MsgBox(标题 ，按钮类型 ,提示信息）D、 MsgBox(提示信息 ，按钮类型 ，标题）22 383 OR 10+2 =34

6、 AND 5=2+3的结果是（C）.A、10B、3C、TrueD、False23 表达式4+5 6 * 7 / 8 Mod 9 的值是(D).A、7B、4C、6D、524 设a=6,则执行x=IIf(a5,1，0)后，x的值为(D）。A、5B、0C、6D、-125 下面关于VB的叙述中，不正确的是（ A ）.A、用VB编写的程序可以在任何操作系统环境中运行。B、VB是面向对象的可视化的软件开发工具.C、VB是在20世纪60年代美国Dartmouth学院开发的Basic语言基础上发展而形成的。 D、VB是由美国Microsoft（微软）公司开发程序设计语言。26 表达式16 / 4-25*8 /

7、 4 Mod 5 2 = （ A )。A、4 B、0C、2 D、 627 声明符号常量应该用关键字（B)。A、PrivateB、ConstC、StaticD、V26/ariant28 下列数据类型中,占用内存最大的是（D)。A、BooleanB、IntegerC、ByteD、Single29 下列VB数据类型中，占用内存最少的是（ D ）.A、CurrencyB、Integer C、Boolean D、Byte 30 RGB 函数通过红。绿。蓝三基色混合产生某种颜色,某语法为RGB（红.绿.蓝),括号中红、绿、蓝三基色的成分使用0255之间的整数。若使用三个滚动条分别输入三种基色，为保证输入数

8、值有效,则应设置(B)属性.A、Scroll和ChangeB、Max和MinC、Smallchange和 LargeChangeD、Value31 k=12。5 ,len（ str（ k ） ）=（ B ） 。 A、 4 B、5 C、 3 D、 232 表达式Abs（-5）*55/5的值是 DA、1B、5C、-25D、2533 产生10，37之间的随机整数的VisualBasic表达式是（C）。A、Int(Rnd（1）27)+11B、Int（Rnd（1）28)+11C、Int（Rnd（1）28）+10D、In t(Rnd（1)*27)+1034 工具栏中的”启动”按钮的作用是（B).A、工程管

9、理窗口B、运行一个应用程序C、打开被选中对象的代码窗口D、运行一个窗体35 不需要编译,计算机便可直接执行的程序是( B ）. A、C语言程序B、 机器语言程序C、 汇编语言程序 D、 Visual Basic语言程序 36 Val (“123ab”）=（ D ）。 A、0 B、 不能转换C、1230 D、123 37 表达式16/4-258/4MOD52的值为 AA、4B、2C、14D、2038 删除字符串前导和尾随空格的函数是(D）。A、Rtrim（ )B、Ltrim（)C、LcaseD、Trim(）39 下列表达式中,其值为0的是(C).A、15 mod 9B、7/9C、79D、7 mo

10、d 1540 表达式Len（123程序设计ABC）的值是 BA、17B、10C、14D、2041 Int（3.1）+round （4。6）=_C_。 A、8B、6 C、-9 D、-7 42 、/、Mod、*等4个算术运算符中，优先级最低的是(A）。A、ModB、/C、D、43 下面正确的赋值语句是（ D ）。A、x=y=1 B、x+2=y2+2C、x+y=1 D、x=y+z1 44 Len（”实践应用能力”)的值是(A）。A、6B、4C、不能确定D、845 表达式Mid（”SHANGHAI”，6，3）的值是（C）.A、ANGHB、SHAC、HAID、SHANGH46 表达式253 mod 3

11、*Int(4.5)的值为(B）.A、1B、8C、4D、547 下面变量名称正确的是( C )。A、x 1 B、integer C、 x_1_y D、 x , y48 不能正确表示条件”两个整型变量A和B之一为0,但不能同时为0的布尔表达式（D)。A、A*B=0ANDABB、（A=0ORB=0)ANDABC、A=0ANDB0ORAX是(D).A、非法表达式B、字符表达式C、算术表达式D、关系表达式51VisualBasic的编程机制是（B)。A、面向图形B、事件驱动C、面向对象D、可视化52 下面4项中合法的变量名是(A).A、X_yzB、XYC、123abcD、integer53 以下可以作为

12、VB变量名的是（C）。A、COS(X)B、X（1)C、CO1D、SIN54 表达式(73+1）（1851)的值是(B）.A、8。76B、6C、6.67D、7.855 下列哪个变量名的取法是不正确的(C）.A、sTmeB、T_12C、T12%D、T_Temp56 可以同时删除字符串前导和尾部空白的函数是（B）。A、LtrimB、TrimC、MidD、Rtrim57 VB窗体文件的扩展名是(A）。A、FRMB、VBWC、VBPD、BAS58 一个具有图形用户界面的“标准EXE”工程必须包含的文件是（ A ）。 A、工程文件和窗体文件。 B、窗体文件和标准模块文件。C、工程文件和资源文件。D、工程文

13、件和标准模块文件.59 数学式3X5写成VB表达式是( A )。A、3=X and X5 B、X=3 and 5XC、3=X or X5D、3=X”A” and Ucase(C）=0 AND a+cb+3 OR NOT d的值是_false_。4.表示x是5的倍数或是9的倍数的逻辑表达式为_x mod 5 = 0 OR x mod 9 = 0_。5。在刚建立工程时，使窗体上的所有控件具有相同的字体格式，就对_font_的属性进行设置.6。Int(-2。6）、Int（2.6）、Fix(-2。6）、Fix（3。6)的值分别是_-3_、_2_、_2_、_3_.7。Label和TextBox控件用来显

14、示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用_label_控件；若允许用户输入文本，则应使用_Textbox_控件。8.若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时,打开一个窗口frm1，请对以下事件过程填空。Private Sub Cmdopen_Click()_frm1.show_end sub9.表达式93 7 Mod 2 2 的值是_1_。10.表达式Ucase（Mid(“abcdefgh”,3，4)）的值是_CDEF_。11.当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的_属性_窗口中，把此文本框的_text_属性设置成空白。1

15、2。已知a=3，b=4,c=5，表达式ab and Not ca Or cb And ca+b的值是_true_。表达式ca And Not b 3000Print ”从1 到：”; i； ”的和是; sEnd Sub答案 【学生答案】i = i + 2【参考答案】i=i+12. -【程序改错】-862题目:以下程序段用于输出100300的所有素数-Option ExplicitPrivate Sub Form_Click（)Dim n As Integer， k As Integer， i As Integer, swit As IntegerFor n = 101 To 300 Step

16、2 k = Int（Sqr（n）) i = 2*ERROR* swit = 1*ERROR* While swit = 0 If n Mod i = 0 Then swit = 1 Else*ERROR* i = i - 1 End If WendIf swit = 0 Then Print n;End IfNext nEnd Sub答案 【学生答案】swit = 1【参考答案】swit=0【学生答案】While swit = 0【参考答案】While i=i【学生答案】i = i - 1【参考答案】i=i+13.Option ExplicitPrivate Sub Form_Click()D

17、im i As Integer, j As Integer, k As IntegerPrint Tab(30)； ”9*9 tablePrint： PrintPrint ” ;For i = 1 To 9*ERROR* Print Tab(i * 6); iNext iPrintFor j = 1 To 9 Print j; ” ”; For k = 1 To j Print Tab(k * 6)； j * k; ”； *ERROR* Next j Print*ERROR*Next k答案 【学生答案】Print Tab(i * 6); i【参考答案】 Print Tab（i * 6); i

18、；【学生答案】Next j【参考答案】 Next k【学生答案】Next k【参考答案】Next j4.-【程序改错】-题目：以下程序段用于计算5的N次方.-Option ExplicitPrivate Sub Form_Click（） Dim n As Integer， k As Integer， s As Long n = InputBox(” Input n ）*ERROR* k = 0*ERROR* s = 0 Do While k = n s = s 5 k = k + 1*ERROR* Next Print 5的”; n次方是”; sEnd Sub答案 【学生答案】k = 0【参考

19、答案】k=1【学生答案】s = 0【参考答案】s=1【学生答案】Next【参考答案】loop-5.【程序改错】-题目：以下程序段用于打印如图1所示的九九乘法表：-Option ExplicitPrivate Sub Form_Click()Dim i As Integer, j As Integer, k As IntegerPrint Tab(30）; 99 tablePrint: PrintPrint ” ”;For i = 1 To 9*ERROR* Print Tab（i * 6)； iNext iPrintFor j = 1 To 9 Print j; ”;*ERROR* For k

20、 = 1 To 9*ERROR*Print Tab（j * 6)； j * k; ” ”; Next k PrintNext jEnd Sub答案 【学生答案】Print Tab(i 6)； i【参考答案】Print Tab(i6)；i;【学生答案】For k = 1 To 9【参考答案】For k = 1 To j【学生答案】Print Tab（j * 6）; j k； ”；【参考答案】Print Tab（k*6）;jk;” ”；6。【程序改错】-题目：下面程序可输出如下图形： * * * * *-Option ExplicitPrivate Sub Form_Click()Dim m As

21、 Integer, n As Integer, s As String, i As Integer， j As Integern = 4m = 1s = ”For i = 5 To 1 Step -1 *ERROR* Print Spc(n) For j = 1 To 2 m - 1 Print s； Next j Print *ERROR* n = n + 1 *ERROR* m = m - 1Next i答案 【学生答案】Print Spc（n）【参考答案】Print Spc（n）；Print Spc(i);?Spc(n）；?Spc（i）；【学生答案】n = n + 1【参考答案】n=n-1n=1+n【学生答案】m = m 1【参考答案】m=m+17。题目：以下程序段用于输出100-300的所有素数-Option ExplicitPrivate Sub Form_Click（)Dim n As Integer, k As Integer， i As Integer， swit As IntegerFor i = 101 To 299 k = Int（Sqr(i） For n = 2 To k If i Mod n = 0 Then *ERROR* Exit End If Ne