1、国家二级 VB机试（数据类型及运算）模拟试卷 7及答案与解析 一、选择题 1 如下关于变体类型变量的叙述中，错误的是 （ A）变体类型数组中只能存放同类型数据 （ B）使用 Array初始化的数组变量，必须是 Variant类型 （ C）没有声明而直接使用的变量其默认类型均是 Variant （ D）在同一程序中，变体类型的变量可以被多次赋以不同类型的数据 2 有数据定义语句： Dim a， b As Integer Dim x， y as Integer执行语句后，不是整型变量的是 （ A） a （ B） b （ C） x （ D） y 3 设有以下定义语句： Private Type po
2、int x As Integer y As Integer End Type Dim a As point下面语句中正确的是 （ A） a=12 （ B） a x=12 （ C） point=12 （ D） point x=12 4 执行语句 Dim X， Y As Integer后， （ A） X和 Y均被定义为整型变量 （ B） X和 Y均被定义为变体类型变量 （ C） X被定义为整型变量， Y被定义为变体类型变量 （ D） X被定义为变体类型变 量， Y被定义为整型变量 5 如果在窗体模块中所有程序代码的前面有语句： Dim x，则 x是 （ A）全局变量 （ B）局部变最 （ C）静态
3、变量 （ D）窗体级变量 6 下列合法的变最名是 （ A） sum-a （ B） num_9 （ C） print$ （ D） 5avg 7 以下合法的 VB变量名是 （ A） a （ B） yPrint （ C） a-b （ D） Type 8 下列符号常量的声明中不合法的是 （ A） Const a As Single=3 5 （ B） Const a As Double=5+8 （ C） Const a As Integer=“25“ （ D） Const a=“OK“ 9 下列说法中，错误的是 （ A）变量名长度不能超过 255个字符 （ B）变量名的第一个字符可以是字母或数字 （ C
4、）变量名只能由字母、数字和下划线组成 （ D）变量名不能使用保留字 10 有如下过程代码： Subvar_dim() Static numa As Integer Dim numb As Integer numa=nurna+2： numb=numb+1： print numa； numb End Sub 连续 3次调用 var dim过程，第 3次调用时的输出是 （ A） 2 1 （ B） 2 3 （ C） 6 1 （ D） 6 3 11 编写如下程序： Private Sub Command1_Click() Function proc(i As Integer) Dim m As Int
5、eger， n As Integer Dim a As Integer， Static b As Integer n=2 a=a+1： b=b+1 For m=1 To 3 proc=a*b+i Print proc(n)； End Function Next m End Sub 程序运行后，单击命令按钮 Command1，输出结果为 （ A） 3 3 3 （ B） 3 4 5 （ C） 3 5 6 （ D） 1 2 3 12 编写如下程序： Private Sub Command1_Click() Dim n As Integer： Static s As Integer For n=1 T
6、o 3 s=s+n Next Print s End Sub 程序运行后，第三次单击命令按钮 Command1时，输出结果为 （ A） 3 （ B） 6 （ C） 9 （ D） 18 13 能够产生 1到 50之间 (含 1和 50)随机整数的表达式是 （ A） Int(Rnd*51) （ B） Int(Rnd(50)+1) （ C） Int(Rnd*50) （ D） Int(Rnd*50+1) 14 以下表达式与 Int(3 5)的值相同的是 （ A） CInt(3 5) （ B） Val(3 5) （ C） Fix(3 5) （ D） Abs(3 5) 15 产生 100以内 (不含 10
7、0)2位随机整数的 Visual Basic表达式是 （ A） Int(Rnd(1)*91)+10 （ B） Int(Rnd(1)*90)+10 （ C） Int(Rnd(1)*91)+11 （ D） Int(Rnd(1)*90)+11 16 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=1234 c1=Trim(Str(c) For i=1 To 4 Print_ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示内容： 1 12 123 1234则在横线处 应填入的内容为 （ A）
8、Right(c1， i) （ B） Left(c1， i) （ C） Mid(c1， i， 1) （ D） Mid(c1， i， i) 17 窗体上有名称分别为 Text1、 Text2的文本框，名称为 Command1的命令按钮。运行程序， 在 Text1中输入 “FormList”，然后单击命令按钮，执行如下程序： Private Sub Command1_Click() Text2 Text=UCase(Mid(Text1 Text， 5， 4) End Sub 在 Text2中显示的是 （ A） form （ B） list （ C） FORM （ D） LIST 18 在窗体上画一个
9、命令按钮，然后编写如下事件过程： Private Sub Command1_Click() aS=InputBox(“请输入一个二进制数 “)： n=Len(a$) For i=1 To n Dec=Dec*2+_(aS， i， 1) Next i Print Dec End Sub 程序功能为：单击命令按钮，将产生一个输入对话框，此时如果在对话框中输入一个二进制数，并单击 “确定 ”按钮，则把该二进制数转换为等值的十进制数。这 个程序不完整，应在横线处填入的内容是 （ A） Left （ B） Right （ C） Val （ D） Mid 19 窗体上有两个名称分别为 Text1、 Tex
10、t2的文本框。 Text1的 KeyUp事件过程如下： Private Sub Text1_KeyUp(KeyCode As Integer， Shift As Integer) Dlm c As String c=UCase(Chr(KeyCode)： Text2 Text=Chr(Asc(c)+2) End Sub 当向文本框 Text1中输入小写字母 a时 ，文本框 Text2中显示的是 （ A） A （ B） a （ C） C （ D） c 20 在窗体上画一个文本框，名称为 Text1，然后编写如下程序： Private Sub Form_Load() Private Sub For
11、m_Click() Text1 Text=“： Text1 SetFocus Dim a As String， s As String End Sub a=Text1 Text： s=“ For k=1 To Len(a) s=UCase(Mid(a， k， 1)+s Next k Text1 Text=s End Sub 程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容 （ A）与原字符串相同 （ B）与原字符串中字符顺序相同，但所有字母均转换为大写 （ C）为原字符串的逆序字符串，且所有字母转换为大写 （ D）为原字符串的逆序字符串 21 在 Visual Basic中
12、，表达式 3*2 5 Mod 3的值是 （ A） 1 （ B） 0 （ C） 3 （ D）出现错误提示 22 把数学表达式 表示为正确的 VB表达似乎应该是 （ A） (5x+3) (2y-6) （ B） x*5+3 2*y-6 （ C） (5*x+3)(2*y-6) （ D） (x*5+3) (y*2-6) 23 要求如果 x被 7除余 2，则输出 x的值，下列语句中不能实现此功能的语句是 （ A） Ifx mod 7=2 Then Print x （ B） If x-(x 7)*7=2Then Print x （ C） If x-(x 7)*7=2 Then Print x （ D） If
13、 x-Int(x 7)*7=2 Then Print x 24 已知： x=-6 y=39则表达式 “y x*Sgn(x)“的值为 （ A） -6 5 （ B） -6 （ C） 6 （ D） 6 5 25 数学式 y2 x =10在 VB中应表示为 （ A） y*y x And 10 =x （ B） Sqr(y) x And x =10 （ C） Sqr(y) x Or x =10 （ D） y*y x Or x =10 26 设变量 x的值是 845，则下面语句的输出是 Print x 100+(x Mod 100) 10+x Mod 10 （ A） 17 （ B） 548 （ C） 845
14、 （ D） 485 27 在窗体上画一个命令按钮和一个文本框，其名 称分别为 Command1和 Text1，把文本框的 Text属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() a=InputBox(“Enter an integer“)： b=Text1 Text： Text1 Text=b+a End Sub 程序运行后，在文本框中输入 456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是 （ A） 579 （ B） 123 （ C） 456123 （ D） 456 28 输入 VB源程序时，若一个命令行中包含两个语
15、句，则两个语句之间的分隔符应使用 （ A）冒号 (： ) （ B）分号 (； ) （ C）下划线 (_) （ D）连字符 (-) 国家二级 VB机试（数据类型及运算）模拟试卷 7答案与解析 一、选择题 1 【正确答案】 A 【试题解析】 变体型是一种可变的数据类型，可以表示任何值，包括数值、字符串、日期、时间等。所以在变体类型的数组中每个元素的数据类型可以不一致。没有声明而直接使用的变量其默认类型均是变体型，在同一程序中，变体类型的变量可以被多次赋以不同类型的数据，使用 Array初始化的数组变量，必须是变体 类型。 【知识模块】 数据类型及运算 2 【正确答案】 A 【试题解析】 在 Vis
16、ual BaSic中用户既可以显式声明一个变量，也可以不声明而直接使用变量，显式声明变量时每个变量都应使用类型说明符或者 As子句声明类型，否则该变量将被视为变体类型。 【知识模块】 数据类型及运算 3 【正确答案】 B 【试题解析】 Type语句用于在模块级别 (过程外的任何代码都将看作模块级别代码，必须先列出声明，随后列出过程 )中定义一个用户自己的数据类型，本质上是一个数据类型集合，它含有一个至一个以上的成员，每个成员可以被定义为不同的数据类型。当声明一个自定义类型变量后，就可通过 “变量名成员名 ”来访问自定义变量中的元素。自定义数据类型的声明与基本数据类型变量的声明相同。 【知识模块
17、】 数据类型及运算 4 【正确答案】 D 【试题解析】 本题考查的考点是有关变量定义的。在 VB中有一种特殊的类型：变体类 型 (Variant)，这种类型可以包含大部分其他类型的数据。在 VB中，如果没有显式声明变量的类型，则该变量默认为变体型 (Variant)。如果一条定义语句定义多个变量，每个变量必须单独说明其类型，若不说明则为变体型。 【知识模块】 数据类型及运算 5 【正确答案】 D 【试题解析】 模块级变量在模块的声明部分用 Private或 Dim声明。模块变量包括窗体变量和标准模块变量 2种。其中，窗体变量声明在所有程序代码之前，可用于该窗体内的所有过程，其作用域为该变量所在
18、的窗体；标准模块变量是在标准模块 中定义的变量，变量的声明和使用与窗体模块中窗体变量类似。 【知识模块】 数据类型及运算 6 【正确答案】 B 【试题解析】 变量是用一个名称来表示的，给变量命名时应遵循规则：名称只能由字母、数字和下划线组成：名称的第一个字符必须是英文字母，最后一个字符可以是类型说明符；名称的有效字符为 255个；不能用 VB的保留字作变量名，但变量名中可以包含保留字，如 ConstA；变量名也不能是末尾带有类型说明符的保留字，如 Dim!是不合法的变量名；不区分字母的大小写。 【知识模块】 数据类型及运算 7 【正确答案】 B 【试题解析】 变量是用一个名称来表示的，给变量命
19、名时应遵循规则： 名称只能由字母、数字和下划线组成；名称的第一个字符必须是英文字母，最后一个字符可以是类型说明符：名称的有效字符为 255个；不能用 VB的保留字作变量名，但变量名中可以包含保留字，如 ConstA；变量名也不能是末尾带有类型说明符的保留字，如 Dimt是不合法的变量名；不区分字母的大小写。 【知识模块】 数据类型及运算 8 【正确答案】 C 【试题解析】 声明符号常量用来代替数值或字符串。一般格式为： Const常量名=表达式 ，常量名 =表达式 ，其中要求表达式的类型和常量的类型是相同或者相容的。 “25“是一个字符串常量，尤法赋值给整型符号常量 a。 【知识模块】 数据类
20、型及运算 9 【正确答案】 B 【试题解析】 变量是用一个名称来表示的，给变量命名时应遵循规则：名称只能由字母、数字和下划线组成；名称的第一个字符必须是英文字母，最后一个字符可以是类型说明符；名称的有效字符为 255个；不能用 VB的保留字作变量名，但变量名中可以包含保留字，如 ConstA；变量名也不能是末尾带有类型说明符的保留字 ，如 Dim!是不合法的变量名；不区分字母的大小写。 【知识模块】 数据类型及运算 10 【正确答案】 C 【试题解析】 Static语句在过程级别中使用，用于声明变量并分配存储空间，在整个代码运行期间都能保留使用 Static语句声明的变量的值。 本题中，当第
21、1次调用过程时，静态变量 numa的初值为 0、普通变量 numb的初值为 0，执行循环语句后，静态变最 numa的值应为 2、普通变量 numb的值为1；当第 2次调用过程时，静态变最 numa的初值为 2、普通变量 numb的初值为0，执行循环语句后，静态 变量 numa的值应为 4、普通变量 numb的值为 1；当第3次调用过程时，静态变量 numa的初值为 4、普通变量 numb的初值为 0，执行循环语句后，静态变量 numa的值应为 6、普通变量 numb的值为 1。 【知识模块】 数据类型及运算 11 【正确答案】 B 【试题解析】 使用 Dim关键字定义的是动态局部变量，过程执行
22、结束后即被释放；使用 static关键字定义的是静态局部变量，过程执行结束后仍然保留。本题中函数 proc中的局部变量 a是动态变量， b是静态变量。即每次函数调用后 b的值会保留。先后三次调用 proc(n)方法，依次输出 3、 4、 5。 【知识模块】 数据类型及运算 12 【正确答案】 D 【试题解析】 Static语句在过程级别中使用，用于声明变量并分配存储空间，在整个代码运行期间都能保留使用 Static语句声明的变量的值。在本题中连续 3次单击命令按钮，第一次单击时输出的 s=1+2+3=6。第二次单击时输出的s=6+1+2+3=12，第三次单击时输出的 s=12+1+2+3=18
23、。 【知识模块】 数据类型及运算 13 【正确答案】 D 【试题解析】 随机数函数 Rnd的 功能是用于产生一个小于 1但大于或等于 0的随机数。为了生成某个指定范围内的随机整数，可使用以下公式： Int(upperbound-lowerbound+1)*Rnd+lowerbound)，其中 upperbound是随机整数范围的上限， lowerbDund是随机整数范围的下限。本题中 upperbound为 50，lowerbound为 1。 【知识模块】 数据类型及运算 14 【正确答案】 C 【试题解析】 Int函数的作用是去返回不大于参数的最大整数，例如Int(4 6)=4， InV(-
24、4 6)=5； Fix函数的作用是去掉参数的小数部分只保留整数部分，在参数为正数的时候， Int函数和 Fix函数的返回值是相同的。 【知识模块】 数据类型及运算 15 【正确答案】 B 【试题解析】 随机数函数 Rnd的功能是用于产生一个小于 1但大于或等于 0的随机数。为了生成某个指定范围内的随机整数，可使用以下公式： Int(upperbound-lowerbound+1)*Rnd+iowerbound)，其中 upperbound是随机整数范围的上限， lowerbound是随机整数范围的下限。 【知识模块】 数据类型及运算 16 【正确答案】 B 【试题解析】 本题考查的考点是有关取
25、子串函数的。征 VB中有 3种取子串函数： Left函数用于在字符串左端开始取 n个字符； Right函数用于在字符串右端开始取 n个字符 (注意予串中字符的顺序与母串中相同 )： Mid函数可以实现在任何位置取任何长度的子串，其中长度省略的话将会一直取到串尾。本题中显示出来的结果可以看出，第一行是字符串的第一个字符，第二行是字符串的前两个字符 所以每行输出的应该是字符串的前 i位。 【知识模块】 数据类型及运算 17 【正确答案】 D 【试题解析】 Mid(字符串，起始位置 ，个数 )函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串， UCase()函数用于将字符串中小写字母
26、转化为大写字母，原本大写或非字母字符保持不变。 【知识模块】 数据类型及运算 18 【正确答案】 D 【试题解析】 Mid(字符串起始位置 ，个数 )函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串。本题中要将二进制数转换为十进制数，应该取出二进制数的每一位然后乘以位权。 【知识模块】 数据类型及运算 19 【正确答案】 C 【试题解析】 本题考查的考点是有关字符转换函数的。 UCase函数的功能为强制转成大写字母； Chr函数的功能是把整数按照 ASCII码转换成字母； Asc函数的功能是把字母转换成对应的 ASCII码。本题中变量 c的值是大写字母 “A”，最终结果是大写字
27、母 “C”。 【知识模块】 数据类型及运算 20 【正确答案】 C 【试题解析】 Mid(字符串，起始位置 ，个数 )函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串， UCase()函数用 于将字符串中小写字母转化为大写字母，原本大写或非字母字符保持不变。本题中在循环内每次取出第 k位个字符并且连接到结果字符串的前面，所以结果字符串是源字符串的逆序字符串。 【知识模块】 数据类型及运算 21 【正确答案】 A 【试题解析】 本题考查的考点是有关算术运算的。按照运算符的优先级，首先执行 3*2得到 6，然后用 6整除 5得到 1，最后用 1对 3求余数得到最终结果 1。本题要注
28、意 “ ”为整除运算符，以及 Mod取余运算的算法。 【知识模块】 数据类型及运算 22 【正确答案】 D 【 试题解析】 VB中常用算术运算符有 8个，其 l中幂运算符 ( )优先级最高；其次是取负 (-)、乘 (*)、浮点除 ( )整除 ( )、取模 (Mod)、加 (+)、减 (-)，要改变运算的优先级可使用圆括号。 【知识模块】 数据类型及运算 23 【正确答案】 C 【试题解析】 整除运算符 “ ”的功能是取两数相除结果的整数部分，取模运算符“MOD”的功能是取两数相除的余数部分。且前者的优先级高于后者。据此判断本题中的选项，只有 C选项使用了 “ ”普通算数除法运算符，而且没有对结
29、果进行取整操作，是不能判断被 7除余 2的。 【知识模块】 数据类型及运算 24 【正确答案】 C 【试题解析】 算术表达式的运算次序为：幂 ( ) 取负 (-) 乘、浮点除 (*、 )整除 ( ) 取模 (Mod) 加、减 (+、 -) 连接 (&)， sgn函数会返回参数的符号。本题 y x的值为 6，最终结果为 -6。 【知识模块】 数据类型及运算 25 【正确答案】 A 【试题解析】 Sgn函数为求平方根函数，为了表达 x既小于 y的平方又大于等于10，两个表达式之间应该使用 And联接。 【知识模块】 数据类型及运算 26 【正确答案】 A 【试题解析】 本题中使用了两种运算：整除运
30、算 “ ”和求余运算 “Mod”，最终输出的是 8+4+5=17。 【知识模块】 数据类型及运算 27 【正确答案】 C 【试题解析】 InputBox函数将会返回用户在输入对话框中输入的文本，以字符串的形式返回；文本框的 Text属性会返回文本框中的文本；而当 “+”运算符的两端都是字符串的时候，执行的是字符串的连接运算。 【知识模块】 数据类型及运算 28 【正确答案】 A 【试题解析】 Visual Basic中的语句是执行具体操作的指令，通常一行输入一条语句。也可把多条语句放在一行，各语句间用冒号 (： )隔开。还可通过续行符 (续行符由一个空格加一个下划线组成 “_”)将一条语句分别放在多行。 【知识模块】 数据类型及运算
