[计算机类试卷]VB笔试模拟试卷270及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷270及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷270及答案与解析.doc(24页珍藏版)》请在麦多课文档分享上搜索。
1、VB 笔试模拟试卷 270及答案与解析 1 下列有关数据库的描述正确的是 ( A)数据库是一个 DBF文件 ( B)数据库是一个关系 ( C)数据库是一个结构化的数据集合 ( D)数据库是一组文件 2 下列语句中正确的是 ( A) If AB Then Print“A不等于 B“ ( B) If A B Then Printt“A不等于 B“ ( C) If A B Then Print“A不等于 B“ ( D) If AB Print“A不等于 B“ 3 不能脱离控件 (包括客体 )而独立 存在的过程是( )。 ( A)事件过程 ( B)通用过程 ( C) Sub过程 ( D)函数过程 4
2、以下语句的输出结果是 _。 a$=“123“ b$=“456“ Print a$; b$ ( A) 123456 ( B) 123456 ( C) 123456 ( D) 123456 5 栈底至栈顶依次存放元素 A、 B、 C、 D,在第 5个元素 E入栈前,栈中元素可以出栈,则出栈序列可能是 _。 ( A) ABCED ( B) DCBEA ( C) DBCEA ( D) CDABE 6 在数据流图中, (椭圆 )代表 _ 。 ( A)源点 ( B)终点 ( C)加工 ( D)模块 7 栈和队列的共同点是 _。 ( A)都是先进后出 ( B)都是先进先出 ( C)只允许在端点处插入和删除元
3、素 ( D)没有共同点 8 在下列几种排序方法中,要求内存量最大的是 _。 ( A)插入排序 ( B)选择排序 ( C)快速排序 ( D)归并排序 9 对于 n个结点的单向链表 (无表头结点 ),需要指针单元的个数至少为 _。 ( A) n-1 ( B) n ( C) n+1 ( D) 2n 10 开发大型软件时,产生困难的根本原因是 ( A)大系统的复杂性 ( B)人员知识不足 ( C)客观世界千变万化 ( D)时间紧、任务重 11 下列符号常量的声明中, ( )是不合法的。 ( A) Const a As Single=1.1 ( B) Const As Integer=“12“ ( C)
4、 Const a AS Double=Sin(1) ( D) Const a=“OK“ 12 如果文本框的 Locked属性设置为 True,则下列说法 正确的是 ( )。 ( A)此时在属性窗口中不可以修改文本框的 Text属性值 ( B)运行时用户不可以在界面上修改文本框中的内容 ( C)在程序代码中不可以修改文本框的内容,如不可以使用语句Text1.Text=“aaa“ ( D)以上均不正确 13 下列程序段的执行结果为 _。 For x=5 To 1 Step-1 For Y=1 To 6-x Print Tab(Y+5);“*“; Next Y Print Next x ( A) *
5、 * * * * ( B) * * * * * ( C) * * * * * ( D) * * * * * 14 为了使列表框中的项目分为多列显示,需要设置的属性为 ( )。 ( A) Columns ( B) Style ( C) List ( D) MultiSelect 15 文本框 TextBox 中的内容若要设置为用户不能修改,应设置 ( )属性。 ( A) Locked ( B) MultiLine ( C) PasswordChar ( D) Scrol1Bar 16 删除组合框中指定的项目所使用的方法是 ( )。 ( A) Move ( B) Remove ( C) Clear
6、 ( D) RemoveItem 17 在运行程序时,在程序代码中改变文本框的 Text属性值,或在文本框中输入新的内容,相应会触发 ( )事件。 ( A) GotFocus ( B) Click ( C) Change ( D) DblClick 18 在窗体上画一个名称为 CommonDialogl的通用对话框,一个名称为 Commandl的命令按钮。然后编写如下事件过程: Private Command1_Click() CommonDialogl.FileName=“ “ CommonDialogl.Filter=“All file|*.*|(*.DoC)|*.Doc|(*.Txt)|
7、*.Txt“ CommonDialoql.Filterlndex=2 CommonDialogl.DialoqTitle=“VBTest“ CommonDialoql.Action=1 End Sub 对于这个程序,似下叙述中错误的是 ( A)该对话框被设置为 “打开 ”对话框 ( B)在该对话框中指定的默认文件名为空 ( C)该对话框的标题为 VBTest ( D)在该对话框中指定的默认文件类型为文本文件 (*.Txt) 19 在 C盘当前文件夹下建立一个名为 SDat.txt的顺序文件。要求用 InputBox函数输入 5名学生的学号 (StuNo)、姓名 (StuName)和 英语成绩
8、(StuEng)。则在下列横线处合适的语句是 ( )。 Private Sub Form_Click() Open“C:SDat.txt“For Output As 1 For i=1 To 5 StuNo=InputBox(“请输入学号 “) StuName=InputBox(“请输入姓名 “) StuEndg=Val(InputBox(“请输入英语成绩 “) Next i Close#1 End Sub ( A) Input#1,StuNo,StuName,StuEndg ( B) Put#1,StuNo,StuName,StuEndg ( C) Write#1,StuNo,StuName
9、,StuEndg ( D) Get#1,StuNo,StuName,StuEndg 20 在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) For i=1 To UBound(a)a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是 _。 ( A) 4 ( B) 5 ( C) 6 ( D) 7 21 在窗体上添加一个命令按钮,名为 Command1,然后为该
10、命令按钮编写如下事件过程,该过程执行结果为 _。 Option Base 1Private Sub Cemmand1_Click() Dim a As Variant a = Array(1, 2, 3, 4) j = 1 for i = 4 To 1 Step - 1 s = s+ a(i)* j j= j* 10 Next i Print sEnd Sub ( A) 4321 ( B) 1234 ( C) 34 ( D) 12 22 若要使某命令按钮获得控制焦点;可使用的方法是 _。 ( A) LostPoeus ( B) SetFocus ( C) Point ( D) Value 23
11、 以下关于变量类型说明符的使用正确的是 ( ) ( A) Dim a%: a=90 ( B) Dim a:a 2000 ( C) Dim a#: a=“OK“, ( D) Dim a&: a=True 24 以下说法不正确的是 ( A) Chr$()函数的作用是把自变量表达式的值转换为相应的 ASC 码 ( B) Val()函数用来把自变量字符串转换为数值 ( C) Log()函数返回以 e为底的自变量的自然对数 ( D) Rnd()函数产生一个 0 1之间的单精度浮点数 25 为了把焦点移到某个指定 的控件,所使用的方法是 ( A) SetFocus ( B) Visible ( C) Re
12、fresh ( D) GetFocus 26 在窗体上画一个名称为 Command1的命令按钮和一个名称为 Text1的文本框,然后编 写如下程序: Private Sub Command1_Click() Dim x, y, z As Integer x=5 y=7 z=0 Text1.Text=“ Call P1(x, y, z) Text1.Text; Str(z) End Sub Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+b End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的内容是 _
13、。 ( A) 0 ( B) 12 ( C) Str(z) ( D)没有显示 27 有如下程序: Private Sub Command1_Click() as=“A WORKER IS HERE“ x = Len(a$) For i=1 To x - 1 b$ =Mid$(a$, i,3) If b$ =“WOR“ Then S=S+ 1 Next Print S End Sub 单击命令按钮,程序运行结果为 ( A) 1 ( B) 2 ( C) 3 ( D) 5 28 在窗体上画一个名为 Command1的命令按钮,其 Command1_Click事件过程如下。 Sub Command1_C
14、lick() Dim student As studtype Dim record_no As Integer record n=1 With student .ino=12 .strname=“Smith“ .strsex=“男 ” .smark=89 End With _ Put # 1, record_no, student Close # 1 End Sub 要求在 c:的随机文件 student dat写入一条记录。应在程序中空行处填入以下哪条语句使该功能完整 ( A) Open“c:student.dat“For Input As # 1 len=len(student) ( B)
15、 Open“c:student.dat:For random As # 1 len=len(student) ( C) Open“c:student.dat“For Output As # 1 len=len(student) ( D) Open“c:student.dat“For Append As # 1 len=len(student) 29 窗体的 MouseDown事件过程 Form_MouseDown(Button As Integer,Shift As Integer, XAsSingle,Y As Single)有 4千参数,关于这些参数,正确的描述是 _。 ( A)通过 Bu
16、tton参数判定当前按下的是哪一个鼠标键 ( B) Shift参数只能用来确定是否按下 Shift键 ( C) Shift参数只能用来确定是否按下 Alt和 Ctrl键 ( D)参数 X, Y用来设置鼠标当前位置的坐标 30 编写如下通用过程: Sub Proc(x As Single, y As Single) t = x x = t/y y = t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click () Dim a As Single Dim b As Single a = 5 b = 4 Proc a, b
17、Print a, b End Sub 程序运行后,如果单击命令按钮,则输出结果为 ( A) 5 4 ( B) 1.25 1 ( C) 4 5 ( D) 1.25 5 31 如果将文本框的 Locked属 性设置为 Tree,则以下说法正确的是 ( A)此时在属性窗口不可以修改文本框的 Text属性值 ( B)运行时用户不可以在界面上修改文本框中的内容 ( C)在程序代码中不可以修改文本框的内容,如不可以使用语句 Text1.Text=“aa“ ( D)以上均不正确 32 在窗体上画一个名称为 Label1、标题为 “Visual Basic考试 ”的标签,两个名称分别为 Conmmnd1和 C
18、om mand2、标题分别为 “开始 ”和 “停止 ”的命令按钮,然后画一个名称为 Timer1的计时器控件,并把其 Interval属性设 置为 500,如图所示。 编写如下程序: Private Sub Form_Load( ) Timer1.Enabled=False End Sub Private Sub Command1_Click( ) Timer1.Enabled=True End Sub PrivateSubCommand2_Click( ) Fimerl.Enabled=False End Sub Private SubTimer1_Timer( ) If Label1.Le
19、ft Width Then Label1.Left=Label1.1eft+20 Else Label1.Left=0 End If End Sub 程序运行后单击 “开始 ”按钮,标签在窗体中移动。 对于这个程序,以下叙述中错误的是 ( A)标签的移动方向为自右向左 ( B)单击 “停止 ”按钮后再单击 “开始 ”按钮,标签从停止的位置继续移动 ( C)当标签全部移出窗体后,将从窗体的另 端出现并重新移动 ( D)标签按指定的时间间隔移动 33 下列程序段的执行结果为 _。 X=2 Y=1 If X*Y 1 Then Y=Y-1 Else Y=-1 Print Y-X 0 ( A) True
20、 ( B) False ( C) -1 ( D) 1 34 编写如下程序: Private Sub Form_Click() a$=“54321“:b$=“abcde“ For j=1 To 5 Print Mid$(a$, 6-j, 1)+Mid$(b$, j, 1); Next j Print End Sub 程序运行后,单击窗体,其输出结果为 _。 ( A) a1b2c3d45e ( B) a5b4c3d2e1 ( C) e1d2c3b4a5 ( D) 1a2b3c4d5e 35 下列语句正确的是 ( A) If AB Then Print“A不等于 B“ ( B) If AB Then
21、 Print“A不等于 B“ ( D) 1f AB Print“A不等于 B“ 36 下列事件过程的功能是:建立一个名为 Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为 1, 2, 3, , 90。请在空白处填入适当的内容,将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form_Click() Dim Y As Single Open _ Y=3.14159/180 For i=1 TO 90 Ksc.K
22、=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) _ Next i Close#2 End Sub 37 在面向对象方法中,类的实例称为 _。 38 使用代码在程序运行期间,把图形文件装入图片框或图像框中所用的函数是_。 39 函数 INT(LEN(“123.456“)的结果是 _。 40 软件工程的目的是成功地开发大型软件系统,主要内容是软件开发 技术和【 】两方面。 41 下列程序的功能是:将数据 1, 2, , 8写入顺序文件 Num.txt中,请补充完整。 Private Sub Form_Click() Dim i As Integer Open “Num
23、.txt“ For Output As#1 For i=1 To 8 _ Next Close #1 End Sub 42 在程序的空白行处填写适当的语句,完成下列功能;依次自动将列表框 List2中所有列表项目移入列表框 List1中,并将移入 List1中的项目从 List2中删除 。 Do While List2.ListCount _ List2.RemoveItem0 Loop 43 输入任意长度的字符串,要求将字符顺序倒置,例如,将输入的 “ABCDE”变换成 “EDCBA”。请把程序补充完整。 Private Sub Commandl_Click Dim a$, i, c$, d
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 270 答案 解析 DOC
