首页考试吧论坛Exam8视线考试商城网络课程模拟考试考友录实用文档求职招聘论文下载
2014中考
法律硕士
2014高考
MBA考试
2014考研
MPA考试
在职研
中科院
考研培训 自学考试 成人高考
四 六 级
GRE考试
攻硕英语
零起点日语
职称英语
口译笔译
申硕英语
零起点韩语
商务英语
日语等级
GMAT考试
公共英语
职称日语
新概念英语
专四专八
博思考试
零起点英语
托福考试
托业考试
零起点法语
雅思考试
成人英语三级
零起点德语
等级考试
华为认证
水平考试
Java认证
职称计算机 微软认证 思科认证 Oracle认证 Linux认证
公 务 员
导游考试
物 流 师
出版资格
单 证 员
报 关 员
外 销 员
价格鉴证
网络编辑
驾 驶 员
报检员
法律顾问
管理咨询
企业培训
社会工作者
银行从业
教师资格
营养师
保险从业
普 通 话
证券从业
跟 单 员
秘书资格
电子商务
期货考试
国际商务
心理咨询
营 销 师
司法考试
国际货运代理人
人力资源管理师
广告师职业水平
卫生资格 执业医师 执业药师 执业护士
会计从业资格
基金从业资格
统计从业资格
经济师
精算师
统计师
会计职称
法律顾问
ACCA考试
注册会计师
资产评估师
审计师考试
高级会计师
注册税务师
国际内审师
理财规划师
美国注册会计师
一级建造师
安全工程师
设备监理师
公路监理师
公路造价师
二级建造师
招标师考试
物业管理师
电气工程师
建筑师考试
造价工程师
注册测绘师
质量工程师
岩土工程师
造价员考试
注册计量师
环保工程师
化工工程师
咨询工程师
结构工程师
城市规划师
材料员考试
监理工程师
房地产估价
土地估价师
安全评价师
房地产经纪人
投资项目管理师
环境影响评价师
土地登记代理人
缤纷校园 实用文档 英语学习 作文大全 求职招聘 论文下载 访谈|游戏
计算机等级考试
您现在的位置: 考试吧 > 计算机等级考试 > 计算机二级考试 > VB > 模拟试题 > 正文

2014年计算机二级考试VB专家预测试卷及答案4

来源:考试吧 2014-3-11 14:12:29 考试吧:中国教育培训第一门户 模拟考场
2014年计算机二级考试VB专家预测试卷及答案提供给各位考生备考,更多考试资料请持续关注考试吧计算机等级考试频道!
第 1 页:单选题
第 5 页:操作题
第 7 页:参考答案

  31.下列可以打开随机文件的语句是( )。

  A.Open"file 1.dat"For Input As#1

  B.Open"file1.dat"For Append As#1

  C.Open"file1.dat"For Output As#1

  D.Open"file1.dat"For Randow As#1 Len=20

  32.有弹出式菜单的结构如右表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是( )。

  A.Private Sub Vorm Click()

  PopupMenu cut

  End Sub

  B.Private Sub Command1 Click()

  PopupMenu edit

  End Sub

  C.Private Sub Form Click()

  PopupMenu edit

  End Sub

  D.Private Sub Form Click()

  PopupMenu cut

  PopupMenu paste

  End Sub

  33.请阅读程序.

  0ption Base 1

  Private Sub Fo,m Click()

  Dim Arr(4,4)As Integer

  For i=1 To 4

  For j=1 To 4

  Arr(i,j)=(i=1)*2+j

  Next j

  Next i

  For i=3 To 4

  For j=3 To 4

  Print Arr(j,i);

  Next j

  Print

  Next i

  End Sub

  程序运行后,单。旨窗体,则输出结果是( )。

  A. 5 7

  6 8

  B. 6 8

  7 9

  C. 7 9

  8 10

  D. 8 10

  8 11

  34.下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str="ABCDABCD",ch="B",则函数的返回值为:"ACDACD"

  Function delchar(str As String,ch As String)As String

  Dim k As Inlegcr,temp As String,ret As String

  ret=""

  For k=1 To Len(str)

  temp=Mid(str,k,1)

  If temp=ch Then

  ret=ret&temp

  End If

  Next k

  delchar=ret

  En d Function

  但实际上函数有错误,需要修改,下面的修改方案中正确的是( )。

  A.把ret=ret&temp改为ret=temp

  B.把If temp=ch Then改为If temp<>ch Then

  C.把delchar=ret改为delchar=temp

  D.把ret=""改为temp=""

  35在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下程序:

  Diln S1 As String,S2 As String

  Private Sub Form Load()

  Text1.Text=""

  Text2.Text=""

  Text1.Enabled=False

  Text2.Enabled=False

  End Sub

  Private Sub Form KeyDown(KeyCode As Integer,Shift As Integer)

  S2=S2&Chr(KeyCode)

  End Sub

  Pri vate Sub Form KeyPress(KeyAscii As Integer)

  S1=S1&Chr(KeyAscii)

  End Sub

  Private Sub Command1 Click()

  Text1.Text=S1

  Text2.Text=S2

  S1=""

  S2=""

  End Sub

  程序运行后,先后按“a”、“b”、“c”键,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为( )。

  A.abc和ABC

  B.空白

  C.ABC和abc

  D.出错

  36.使用驱动器列表框Drive1、目录列表框Dir1、文件列表框File1时,需要设置控件的

  同步,以下能够正确设置两个控件同步的命令是( )。

  A.Dir1.Path=Drive1.Path

  B.File1.Path=Dri1.Path

  C.File1.Path=Drive1.Path

  D.Drive1.Drive=Dri1.Path

  37.以下关于弹出式菜单的叙述中,错误的是( )。

  A.一个窗体只能有一个弹出式菜单

  B.弹出式菜单在菜单编辑器中建立

  C.弹出式菜单的莱单名(主菜单项)的“可见”属性通常设置为False

  D.弹出式菜单通过窗体的PopupMenu方法显示

  38.有如下程序:

  Private Type stu

  X As String

  Y As Integer

  End Type

  Private Sub Command1 Click()

  Dim a As stu

  a.X="ABCD"

  a.Y=12345

  Print a

  End Sub

  程序运行时出现错误,错误的原因是( )。

  A.Type定义语句没有放在标准模块中

  B.变量声明语句有错

  C.赋值语句不对

  D.输出语句Print不对

  39.在窗体上画两个名称分别为Text1、Text2的文本框,一个名称为Label1标签,窗体

  外观如图a所示,要求当改变任一个文本框的内容,就会将该文本框的内容显示在标签中,如图b所示。实现上述功能的程序如下:

  

  Private Sub Text1_Change()

  Call ShowText(Text1)

  End Sub

  Private Sub Text2_Change()

  Call ShowText(Text2)

  End Sub

  Private Sub ShowText(T As TextBox)

  Labell.Caption="文本框中的内容是:"&T.Text

  End Sub

  关于上述程序,以下叙述中错误的是( )。

  A.ShowText过程的参数类型可以是Control

  B.ShowText过程的参数类型可以是Variant

  C.两个过程调用语句有错,应分别改为Call ShowText(Text1,Text)、Call Show Text

  (Text2,Text)

  D.ShowText过程中的T是控件变量

  40.设有打开义件的语句如下:

  Open"test_dat"For Random As#1

  要求把变量a中的数据保存到该文件中,应该使用的语句是( )。

  A.Input#1 a

  B.Write#1 a

  C.Put#1,a

  D.Get#1,a

上一页  1 2 3 4 5 6 7 8 9 10  ... 下一页  >> 

  相关推荐:

  2014计算机等级《二级VB》上机预测题及答案汇总

  考试吧考后首发2014年3月计算机等考真题及答案通知热点文章

  考试吧推荐:2014年3月计算机二级考前冲刺备考专题

文章搜索
版权声明:如果计算机等级考试网所转载内容不慎侵犯了您的权益,请与我们联系800@exam8.com,我们将会及时处理。如转载本计算机等级考试网内容,请注明出处。