201301批次网上考试可视化程序的设计(VB)B卷

上传人:l**** 文档编号:134119576 上传时间:2020-06-02 格式:DOC 页数:9 大小:389.50KB
返回 下载 相关 举报
201301批次网上考试可视化程序的设计(VB)B卷_第1页
第1页 / 共9页
201301批次网上考试可视化程序的设计(VB)B卷_第2页
第2页 / 共9页
201301批次网上考试可视化程序的设计(VB)B卷_第3页
第3页 / 共9页
201301批次网上考试可视化程序的设计(VB)B卷_第4页
第4页 / 共9页
201301批次网上考试可视化程序的设计(VB)B卷_第5页
第5页 / 共9页
点击查看更多>>
资源描述

《201301批次网上考试可视化程序的设计(VB)B卷》由会员分享,可在线阅读,更多相关《201301批次网上考试可视化程序的设计(VB)B卷(9页珍藏版)》请在金锄头文库上搜索。

1、201301批次网上考试可视化程序设计(VB) B 卷 考试批次:201301批次网上考试 课程:可视化程序设计(VB)题号 一二三四合计 已做/题量 10 / 105 / 55 / 52 / 222 / 22 得分/分值 30 / 3020 / 2040 / 4010 / 10100 / 100 一、单项选择题 (共10题、总分30分、得分30分) 1. 要使某控件在运行时不可显示,应对( )属性进行设置。 (本题分数:3 分,本题得分:3 分。)A、EnabledB、VisibleC、BackColorD、Caphon题目信息难度:3习题编号:04d49a87-c4c2-43f9-8ae8

2、-97503b718d39正确答案:B解题方案:2. 通用过程可以通过执行“工具”菜单中的( )命令来建立。 (本题分数:3 分,本题得分:3 分。)A、添加过程B、通用过程C、添加窗体D、添加模块题目信息难度:3习题编号:317b193d-882a-42d9-becb-05997d1a2037正确答案:A解题方案:3. 假设A=3,B=7,C=2,则表达式 NOT ( BA) 的值是 ( ) (本题分数:3 分,本题得分:3 分。)A、TrueB、 FalseC、表达式错误D、不确定题目信息难度:3习题编号:3c09dd72-4c6b-4c3c-8c9b-ff7b278f9f9d正确答案:B

3、解题方案:4. 为了使窗体的大小可以改变,必须把它的BorderStyle属性设置为( ) (本题分数:3 分,本题得分:3 分。)A、1B、 2C、 3D、 4题目信息难度:3习题编号:b647eb29-3312-470e-a53c-817f66eb8899正确答案:B解题方案:5. 若有数组说明语句:Dim t(1 To 10) As Variant,则t被定义为( )。 (本题分数:3 分,本题得分:3 分。)A、数值数组B、可调数组C、字符串数组D、可变类型数组题目信息难度:3习题编号:bb0b315f-c26c-4dc9-8cdf-1a32f626517a正确答案:D解题方案:6.

4、如果X是一个正实数,精确到小数点后第二位的表达式是( ) (本题分数:3 分,本题得分:3 分。)A、0.01 * Int ( X + 0.005 )B、 0.01 * Int ( 100 * ( X +0.005 ) )C、 0.01 * Int ( 100 * ( X +0.05 ) )D、 0.01 * Int ( X +0.05 )题目信息难度:4习题编号:968757b6-b551-42ac-ad4d-89e65d5ef923正确答案:B解题方案:7. 下列语句正确的是( )。 (本题分数:3 分,本题得分:3 分。)A、For i=1 To mFor j=1 To n Next i

5、 Next j B、For i=1 To m For j=1 To nNext i,j C、For i=1 To m For j=1 To n Next j,i D、For i=1 To m While x0 Next i end题目信息难度:4习题编号:02d265c3-12da-4ed0-9fc1-8ab52cfdb1c3正确答案:C解题方案:8. 以下程序段中循环语句( )。x%=0 While Not x x=x+1 Print x Wend (本题分数:3 分,本题得分:3 分。)A、有语法错误B、 溢出C、 循环体执行一次D、循环体一次也不执行题目信息难度:4习题编号:5b0d8b

6、94-8070-4316-a84b-95c756365ce8正确答案:B解题方案:9. 当BOF属性为Ture时,表示( )。 (本题分数:3 分,本题得分:3 分。)A、当前记录位置位于Recordset对象的第一条记录B、当前记录位置位于Recordset对象的第一条记录之前C、当前记录位置位于Recordset对象的最后一条记录D、当前记录位置位于Recordset对象的最后一条记录之后题目信息难度:4习题编号:6297481b-3f22-451a-b218-b32ac02dddab正确答案:B解题方案:10. 用于设置或返回文件类型的属性是( )。 (本题分数:3 分,本题得分:3 分

7、。)A、DriveB、 PathC、 PatternD、 FileTitle题目信息难度:4习题编号:d2dfa70e-61d7-47ea-9ca5-34c961d27c34正确答案:C解题方案:Top二、填空题 (共5题、总分20分、得分20分) 1. 根据文件容区分,文件分为 1 和 2 。 (本题分数:4 分,本题得分:4 分。)题目信息难度:2习题编号:e8092198-c965-46d1-b01c-a4a056b11ec2正确答案:程序文件、数据文件解题方案:反馈信息:2. VB中三种文件访问类型是 1 、 2 、 3 (本题分数:4 分,本题得分:4 分。)题目信息难度:2习题编号

8、:12b46d01-6351-4307-b5c0-816051801a0a正确答案:顺序、随机、二进制解题方案:反馈信息:3. 要使标签框有边框,需设置BorderStyle属性的值为 1 。 (本题分数:4 分,本题得分:4 分。)题目信息难度:2习题编号:fdd0afb3-73d9-4c45-ae89-ba16cd60a00e正确答案:1Fixed Single解题方案:反馈信息:4. VB程序的错误一般分为 1 、 2 和 3 三类。 (本题分数:4 分,本题得分:4 分。)题目信息难度:3习题编号:c239fba8-7316-489a-b582-b904878b8d1e正确答案:编译错

9、误,运行时错误,逻辑错误解题方案:反馈信息:5. 在执行KeyPress事件过程中,KeyAscii是所按键的 1 值,对于有上档字符和下档字符的键,档执行KeyDown事件过程中,KeyCode是 2 字符的 3 值。 (本题分数:4 分,本题得分:4 分。)题目信息难度:3习题编号:cac7c797-6818-4be3-8552-067fc1eadc1b正确答案:ASCII、下档、ASCII解题方案:反馈信息:Top三、程序阅读题 (共5题、总分40分、得分40分) 1. 下面事件过程的功能是输入某班学生的某门课程成绩,并存放到文件“d:file2.dat”中,在横线上填上适当容。 Pri

10、vate Sub Command1_Click()Dim n%, i%, score! n = InputBox(输入学生人数:) Open d:file2.dat (1) As #1For i = 1 To nscore = InputBox(输入第 & Str(i) & 个学生的成绩:)(2) Next iClose # End Sub (本题分数:8 分,本题得分:8 分。)题目信息难度:6习题编号:63ce5de6-4605-46dc-b3eb-f706c7b65efc正确答案:(1) For Output (2) Write #1, score解题方案:文件操作反馈信息:2. 在窗体

11、上画一个文本框,有如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer)Dim char As String char= Chr(KeyAscii)KeyAscii = Asc(UCase(char)Print String(6, KeyAscii)End Sub 程序运行后,如果在键盘上输入字母“a”,则窗体上显示的结果。 (本题分数:8 分,本题得分:8 分。)题目信息难度:6习题编号:9d54af15-5882-4883-9b07-975bf89379d9正确答案:程序运行后,如果在键盘上输入字母“a”,则窗体上显示的结果为:AAA

12、AAA 。解题方案:注意键盘事件的参数反馈信息:3. 阅读程序 Sub form_click() a = 10:b = 15c = 20d = 25 Print a; Spc(5); b; Spc(7); c Print a; Space$(8); b; Space$(5); c Print c; Spc(3); +; Spc(3); d; Print Spc(3); =; Spc(3); c + d End Sub 运行上面的程序,单击窗体,输出结果是( ) (本题分数:8 分,本题得分:8 分。)题目信息难度:6习题编号:a2318a3a-2db1-43ff-be67-ab2ffc5042

13、cb正确答案:10 15 20 10 15 20 20 + 25 = 45解题方案:在单击事件过函数输出结果反馈信息:4. Private Sub Command1_Click() Dim n As Integer Dim t As Integern = 354 t = 0 While (n 1) t = t + f1(n Mod 10) n = n 10 Wend Print t End Sub Public Function f1(n As Integer)If (n = 0) Thenf1 = 0Else If (n = 1) Then f1 = 1 Else f1 = n * f1(n - 1) End If End Function 单击一次Command1按钮一次,窗体上显示的是什么? (本题分数:8 分,本题得分:8 分。)题目信息难度:6习题编号:56e9394b-1b47-4170-a8f0-d889cdace615正确答案:150解题方案:函数调用过程与循环操作反馈信息:5. 下面程

展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 办公文档 > 工作范文

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号