南京工程学院vb题库1套.docx
- 文档编号:30652242
- 上传时间:2023-08-18
- 格式:DOCX
- 页数:14
- 大小:17.62KB
南京工程学院vb题库1套.docx
《南京工程学院vb题库1套.docx》由会员分享,可在线阅读,更多相关《南京工程学院vb题库1套.docx(14页珍藏版)》请在冰豆网上搜索。
南京工程学院vb题库1套
南京工程学院vb题库。
。
。
。
试卷编号:
8947
所属语言:
VisualBasic
试卷方案:
09-10-2《程序设计基础—VB》模拟
试卷总分:
100分
共有题型:
6种
一、判断共5题(共计10分)
第1题(2.0分)
Single和Double型用于保存浮点数,在VB中定义单精度浮点8位
双浮点16位.
答案:
N
第2题(2.0分)
当窗体的ScaleTop=0,ScaleLeft=0时,这个窗体Top和Left值也是0.
答案:
N
第3题(2.0分)
Frame控件是一种容器控件,因此它可有它自己的坐标系.
答案:
N
第4题(2.0分)
同一Form窗体中的各控件可以相互重叠,其显示的上下层次的
次序不可以调整.
答案:
N
第5题(2.0分)
move方法的一般形式是:
对象名.moveA,B[,C,D],其中A指Left
C指width.
答案:
N
二、单项选择共20题(共计40分)
第1题(2.0分)
下面4项中不属于面向对象系统三要素的是().
A:
变量
B:
事件
C:
属性
D:
方法
答案:
A
第2题(2.0分)
选中复选框控件时,value属性的值,可以是().
A:
True
B:
false
C:
0
D:
1
答案:
D
第3题(2.0分)
当输入4时,以下程序的输出结果是______.
PrivateSubCommand1_Click()
x=InputBox(x)
Ifx^2<15Theny=1/x
Ifx^2>15Theny=x^2+1
Printy
EndSub
A:
4
B:
17
C:
18
D:
25
答案:
B
第4题(2.0分)
保存新建的工程时,默认的路径是().
A:
MyDocuments
B:
VB98
C:
\
D:
Windows
答案:
B
第5题(2.0分)
Cls方法可清除窗体或图片框中的信息是.
A:
Picture属性设置的背景图案
B:
在设计时放置的控件
C:
程序设计时产生的图形和文字
D:
以上方法都对
答案:
C
第6题(2.0分)
以下程序
OptionBase1
PrivateSubCommand1_Click()
Dima%(3,3)
Fori=1To3
Forj=1To3
Ifj>1Andi>1Then
a(i,j)=a(a(i-1,j-1),a(i,j-1))+1
Else
a(i,j)=i*j
EndIf
Printa(I,j);"";
Nextj
Nexti
EndSub
输出结果是
A:
123
231
323
B:
123
123
123
C:
123
246
369
D:
111
222
333
答案:
A
第7题(2.0分)
语句PRINT"SGN(-26)=";SGN(-26)的输出结果为().
A:
SGN(-26)=26
B:
SGN(-26)=-26
C:
SGN(-26)=+1
D:
SGN(-26)=-1
答案:
D
第8题(2.0分)
运行下面的程序:
CLS
LINE(100,100)-(200,50)
LINE-(150,150)
LINE-(100,100)
屏幕上显示的是().
A:
三条放射形直线
B:
四条放射形直线
C:
矩形
D:
三角形
答案:
D
第9题(2.0分)
执行下面程序段后,变量a的值为______.
ForI=1To3
Forj=1ToI
Fork=jTo3
a=a+1
Nextk
Nextj
NextI
A:
3
B:
9
C:
14
D:
21
答案:
C
第10题(2.0分)
设x=8,y=14,z=15,以下表达式的值是
x A: 1 B: -1 C: True D: False 答案: C 第11题(2.0分) 要想不使用Shift和Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为: A: 0 B: 1 C: 2 D: 其他 答案: B 第12题(2.0分) 如果要在菜单中添加一个分隔线,则应将其Caption属性设置为(). A: = B: * C: & D: - 答案: D 第13题(2.0分) 以下可以作为VB变量名的是(). A: SIN B: CO1 C: COS(X) D: X(-1) 答案: B 第14题(2.0分) 在一个语句内写多条语句时,用来分隔每条语句的符号是(). A: B: : C: 、 D: ; 答案: B 第15题(2.0分) 以下正确的For…Next结构是 A: Forx=5Step10 … Nextx B: Forx=3To-3Step-3 … Nextx C: Forx=1To10 start: … Nextx Ifi=10ThenGoTostart D: Forx=3To10Step3 … Nextm 答案: B 第16题(2.0分) 要使得窗体在出现之前就完成相关的程序设置可在()事件中进行 编程. A: linkopen B: KeyPress C: load D: click 答案: C 第17题(2.0分) 如果从数据文件INPUT.DAT中读取数据时,以下打开文件方式中, 正确的是(). A: OPENINPUT.DATFORINPUTAS#1 B: OPENINPUT.DATFOROUTPUTAS#1 C: OPEN"INPUT.DAT"FORINPUTAS#1 D: OPEN"I",#1INPUT.DAT 答案: C 第18题(2.0分) 当使用Line方法画直线后,当前坐标在 A: (0,0) B: 直线起点 C: 直线终点 D: 容器的中心 答案: C 第19题(2.0分) 下面是()合法的单精度型变量. A: num! B: sum% C: xinte$ D: mm# 答案: A 第20题(2.0分) 如下数组声明语句: Dima(3,-2To2,5),则数组a包含的元素的个数为 A: 120 B: 75 C: 60 D: 13 答案: A 三、程序填空共1题(共计10分) 第1题(10.0分) OptionExplicit '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '功能: 本程序实现功能: 将顺序文本文件“MYFILE.TXT”的 '内容一个字符一个字符地读入文本框txtTest中 '------------------------------------------------------- PrivateSubForm_Click() DimInputDataAsString*1 txtTest.Text="" '**********SPACE********** OpenApp.Path&"\MYFILE.TXT"For【? 】As#1 '**********SPACE********** DoWhile【? 】EOF (1) Input#1,InputData '**********SPACE********** txtTest.Text=txtTest.Text+【? 】 Loop Close#1 EndSub 答案: =======(答案1)======= Input =======(答案2)======= Not =======(答案3)======= InputData 四、程序改错共1题(共计10分) 第1题(10.0分) '------------------------------------------------ '【程序改错】 '------------------------------------------------ '题目: 随机产生并输出100以内大于50的20个整数,输 '出时每5个数一行。 '------------------------------------------------ OptionExplicit PrivateSubForm_Click() RandomizeTimer DimiAsInteger,maAsInteger '**********FOUND********** i=1 '**********FOUND********** DoUntili<20 ma=Rnd()*100\1 Ifma>50Then Printma; i=i+1 '**********FOUND********** Ifi\5=0Then Print EndIf EndIf Loop EndSub 答案: =======(答案1)======= i=0 =======(答案2)======= Dowhilei<20 =========或========= Dowhile20>i =========或========= Dowhilei<=19 =========或========= Dowhile19>=i =======(答案3)======= Ifimod5=0Then 五、程序设计共1题(共计20分) 第1题(20.0分) '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目: (事件)双击窗体。 '(响应)求3+6+9+12+15+18+……+300的和,并将结 '果输出到窗体上。 将结果存入变量SUM中。 '------------------------------------------------- 答案: ---------------------- DimiAsInteger Fori=3To300 IfiMod3=0Then sum=sum+i EndIf Next Printsum ---------------------- 六、VB窗体设计共1题(共计10分) 第1题(10.0分) --------------------------------------------------------------------- 【窗体设计】 --------------------------------------------------------------------- 要求: 当用户单击窗体时,弹出对话框由用户输入任意整,提示框显示所输入 整数的奇、偶性,界面提示信息如图所示。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 南京 工程学院 vb 题库