[计算机类试卷]国家二级VB机试(数据类型及运算)模拟试卷21及答案与解析.doc
《[计算机类试卷]国家二级VB机试(数据类型及运算)模拟试卷21及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级VB机试(数据类型及运算)模拟试卷21及答案与解析.doc(19页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级 VB机试(数据类型及运算)模拟试卷 21及答案与解析 一、选择题 1 窗体上有两个名称分别为 Text1、 Text2的文本框。 Text1的 KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Dim 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 2 窗体上有名称分别为 T
2、ext1、 Text2的文本框,名称为 Commandl的命令按钮。运行程序,在 Text1中输入 “FormList”,然后单击命令按钮,执行如下程序: Private Sub Commandl_Click() Text2 Text=UCase(Mid(Text1 Text, 5, 4) End Sub 在 Text2中显示的是 ( A) form ( B) list ( C) FORM ( D) LIST 3 窗体上有 1个名称为 Commandl的命令按钮,事件过程如下: Private Sub Commandl_Click() m= 3 6 If Sgn(m)Then n=Int(m)
3、 Else n=Abs(m) End If Print n End Sub 运行程序,并单击命令按钮,窗体上显示的内容为 ( A) 4 ( B) 3 ( C) 3 ( D) 3 6 4 设有如下程序: Private Sub Form_Click() num=InputBox(“请输入一个实数 “): P=InStr(num, “ “) Ifp 0 Then Print Mid(num, P+1) Else Print“END“ End If End Sub 运行程序,单击窗体,根据提示输入一个数值。如果输入的不是实数,则程序输出“END”;否则 ( A)用字符方式输出该实数 ( B)输出该实
4、数的整数部分 ( C)输出该实数的小数部分 ( D)去掉实数中的小数点,保留所有数码输出 5 在窗体上画一个文本框,名称为 Text1,然后编写如下程序: Private Sub Form_Load() Private Sub Form_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 程序运行后,在文本框中输入一个字符串,然后
5、单击窗体,则文本框中的内容 ( A)与原字符串相同 ( B)与原字符串中字符顺序相同,但所有字母均转换为大写 ( C)为原字符串的逆序字符串,且所有字母转换为大写 ( D)为原字符串的逆序字符串 6 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() a =InputBox(“请输入一个二进制数 “) n=Len(a ) For i=1 To n Dec=Dec*2+_(a, i, 1) Next i Print Dec End Sub 程序功能为:单击命令按钮,将产生一个输入对话框,此时如果在对话框中输入 一个二进制数,并单击 “确定 ”
6、按钮,则把该二进制数转换为等值的十进制数。这个程序不完整,应在横线处填入的内容是 ( A) Left ( B) Right ( C) Val ( D) Mid 7 以下程序的功能是随机产生 10个两位的整数: Option Base1 Privme Sub Commandl_Click() Dim a(10)As Integer,i As Integer Randomize For i=1 To 10 a(i)=Int(Rnd*100)+1 Print a(i) Next i End Sub 运行以上程序,发现有错误,需要对产生随机数的语句进行修改。以下正确的修改是 ( A) a(i)=Int
7、(Rnd*100) ( B) a(i)=Int(Rnd*90)+10 ( C) a(i)=Int(Rnd*100)+l O ( D) a(i)=Int(Rnd*01) 8 窗体上有一个名称为 Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令 按钮的单击事件过程如下: Private Sub Commandl_Click() Dim a(10)As Integer,x As Integer For i=1 To 10 a(i)=Int(Rnd*100) Next x
8、=InputBox(“输入 100以内的整数: “) p=0 For i=1 TO 10 Ifa(i)=x Then p=i: Exit For End If Next Ifp=0 Then Print“没有找到与输入数据相同的数 !“ Else Print Str(x)+“在数组中的位置是 “+Str(p) End If End Sub 对于上述事件过程,以下叙述中正确的是 ( A)本程序实际产生的随机数是 0 99 ( B)若产生的随机数中有相同数,则 p是其中最后一个数的位置 ( C)程序有错, p的初值设置不对 ( D)程序有错, InputBox函数产生的数据与 x的类型小匹配 9
9、在 Visual Basic中,表达式 3*2 5 Mod 3的值是 ( A) 1 ( B) 0 ( C) 3 ( D)出现 错误提示 10 表达式 2*3 2+4*2 2+3 2的值是 ( A) 30 ( B) 31 ( C) 49 ( D) 48 11 设 a=4, b=5, c=6,执行语句 Print a b And b c窗体上显示的是 ( A) True ( B) False ( C)出错信息 ( D) 0 12 以下关系表达式中,其值为 True的是 ( A) XYZ “XYZ“ ( B) VisualBasic “visualbasic“ ( C) the=“there“ (
10、D) Integer “Int“ 13 把数学表达式 表 示为正确的 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) 14 下面程序运行时,若输入 395,则输出结果是 Privme Sub Commandl_Click() Dim x x=InputBox(“请输入一个 3位整数 “) Print x Mod 10, x 100, (x Mod 100) 10 End Sub ( A) 3 9 5 ( B) 5 3 9 ( C) 5 9 3 ( D) 3 5 9 1
11、5 设 a=2, b=3, c=4, d=5,下列表达式的值是 a b And c =d Or 2*a c ( A) True ( B) False ( C) 1 ( D) 1 16 设 a=10, b=5, c=1,执行语句 Print a b c窗体上显示的是 ( A) True ( B) False ( C) 1 ( D)出错 17 要求如果 x被 7除余 2,则输出 x的值,下列语句中不能实现此功能的语句是 ( A) Ifx mod 7=2 Then Print x ( B) Ifx (x 7)*7=2 Then Print x ( C) Ifx (x 7)*7=2 Then Prin
12、t x ( D) Ifx Int(x 7)*7 =2 Then Print x 18 满足下列条件之一的年份是闰年: 1)年份能被 4整除但不能被 100整除 2)年份能被 400整除若 y代表年份,下面判断闰年的正确表达式是 ( A) y Mod 4 And y Mod 100 Or y M0d 400 ( B) y Mod 4=0 Or y Mod 100 0 And y Mod 400=0 ( C) y Mod 100 0 And(y Mod 4=0 Or Y Mod 400=0) ( D) y Mod 4=0 And y Mod 100 0 Or y Mod 400=0 19 已知 a
13、=6, b=15, c=23,则语句 Print Sgn(a+b Mod 6 c a)&a+b的输出结果为 ( A) 6 ( B) 16 ( C) 31 ( D) 121 20 设 a=2, b=3, c=4, d=5, 表达式 Not a =c Or 4*c=b2 And b a+c的值是 ( A) 1 ( B) 1 ( C) True ( D) FalSe 21 已知: x=6 y=39则表达式 “y x*Sgn(x)”的值为 ( A) 6 5 ( B) 6 ( C) 6 ( D) 6 5 22 设: a=12, b=5, c=7,表达式 x=(a c+a Mod b)+Int(13 5)
14、的值是 ( A) 5 ( B) 6 ( C) 7 ( D) 9 23 表达式 12 2 4的值是 ( A) 1 5 ( B) 2 ( C) 4 ( D) 1 24 设: a=2, b=8, c=6, d=3,表达式 a b And Not(c d)Or d c的值是 ( A) 1 ( B) 0 ( C) True ( D) False 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 设 a=10, b=4, c=5
15、, d=7,表达式 a b And Not c d+6的值为 ( A) Tme ( B) False ( C) 1 ( D) 0 27 以下叙述中错误的是 ( A)续行符与它前面的字符之间至少要有一个空格 ( B) Visual Basic中使用的 续行符为下划线 (_) ( C)以撇号 ()开头的注释语句可以放在续行符的后面 ( D) visual Basic可以自动对输入的内容进行语法检查 28 下列有语法错误的赋值语句是 ( A) y=7=9 ( B) s=m+n ( C) Text1 Text=10 ( D) m+n=12 29 输入 VB源程序时,若一个命令行中包含两个语句,则两个语
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 机试 数据类型 运算 模拟 21 答案 解析 DOC
