VB复习资料Word格式文档下载.docx
- 文档编号:21875925
- 上传时间:2023-02-01
- 格式:DOCX
- 页数:7
- 大小:17.71KB
VB复习资料Word格式文档下载.docx
《VB复习资料Word格式文档下载.docx》由会员分享,可在线阅读,更多相关《VB复习资料Word格式文档下载.docx(7页珍藏版)》请在冰豆网上搜索。
C)TxetBox.Text=“Hello”
D) TxtTest.DateField=“Hello”
6.要使Label控件有边框,应设置(C)属性
A)EnabledB)BackColor
C)BorderStyleD)BackStyle
7.如果在设计阶段在属性窗口中将命令按钮(A)属性设置为False。
则运行按钮从窗体上消失。
A)VisibleB)Enabled
C)DisabledPictureD)Default
8.下列字符序列中合法的变量名是(D)
A)IntegerB)23BC)X/YD)VB345
9.表达式4+5\6*7/8Mod9的值是(B)
A)4B)5C)6D)7
10.下面表达式为假的是(C)
A)“Xyz”>
“XYZ”B)“Integer”>
“Int”
C)“The”>
“There”D)“BASIC”<
>
“basic”
11.设有语句:
X=InputBox(“请输入数值,
“0”,“示例”),程序执行该语句时,如果从键盘上输入数值3,并按回车键,则下列叙述正确的是(C)
A)变量x的值是数值3
B)在InputBox的对话框标题栏中显示的是“示例”
C)变量x的值是字符串“3”
D)0是默认值
12.下面语句声明的数组包含的元素个数是(D)
DimA(-2to5)AsInteger
A)5B)6C)7D)8
13.Sub过程与Function过程最根本的区别是(D)
A)Sub过程了一支接使用call语句或者直接使用过程名调用,而Function过程不可以。
B)Function过程可以有参数,而Sub过程不可以
C)两种过程参数的传递方式不同
D)Sub过程的过程名不能返回值,而Function过程能通过过程名返回值。
14.在窗体上画1个名为Command1的命令按钮,并编写如下程序:
PrivateSubCommand1_Click()
DimxAsInteger,yAsInteger
X=10:
y=5
Callfl(x,y)
Printx;
y
EndSub
PrivateSubfl(byvalx1AsInteger,y1AsInteger)
X1=x1+2
y1=y1+2
程序运行后,窗体上显示的内容是(C)
A)105B)125C)107D)127
15.下列操作中不能打开菜单编辑器的是(D)
A)按Ctrl+E键
B)单击工具栏中的“菜单编辑器”按钮
C)执行工具菜单栏中的“菜单编辑器”命令
D)按Alt+E键
填空题
1.VisualBasic程序有三种工作模式,即:
设计模式、运行模式、中断模式
2.程序运行装入窗体时,最先出发的是事Load事件
3.符号“!
”“#”、“%”、“&
”、“@”$”可分别作为:
单精度、双精度、整型、长整型、货币型、字符型数据的型符。
在VisualBasic中同一行可写多条语句,语句间用:
分隔,一条语句也可以分为多条书写,但需要在本行最后加入序行符号:
空格_。
4.Format(12345.4“00.000.##”)函数值是:
0.12,345.4Format(“LANZHOU,“<
”)函数的值是:
lanzhou.
5.设a=6,则执行x=IIf(a>
5,-1,0)后,则x的值为-1.
6.假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1,在Form1画一个命令按钮Command1,程序运行后,要求当单击命令按钮时,Form1窗体隐藏,显示窗体Form2。
PrivateSubFormClick()
Form1.Hide
Form2.Show
7.下面程序的用是利用随机函数产生20个10---100之间(包含10、100)的随机整数,打印其中为5的倍数的数,并求出它的总和,
Dimm%,sum%
Sum=0
Form=1To20
X=Int(Rnd*91+10)
IfxMod5=0Then
Sum=Sum+x
EndIf
Nextm
Print“Sum=”Sum
EndSub
8.以下程序的功能是用随机函数产生了10个0—100之间的随机整数,然后用起泡法降序排列后,输出全部数据。
PrivateSubFormClick()
Dims(1to10)AsInteger
DimIAsInteger,jAsInteger,tAsInteger
Fori=1to10
S(i)=Int(101*Rnd
(1))
Nexti
Fori=1To9
Forj=1To10-i
Ifs(j)<
s(j+1)Then
T=s(j):
s(j)=s(j+1):
s(j+1)=T
Printis(i)
程序分析题
1.PrivateSubCommand1_Click()
DimxAsInteger,sAsInteger
X=Val(InputBox(“请输入一个正整数:
”))
S=0
Ifx<
5Then
S=S*x
Else
S=s+x
Text1.text=“s=”&
str(s)
程序运行时单击Command1,且设输入的数据为6时,文本框Text1的值是:
S=6
2.在窗体上画1个命令按钮和1个标签,其名称分别为Command1和Label1,然后编写如下事件过程:
Dimx%,j%
X=0
ForJ=6To1step-2
X=x+1
Nextj
Lable1.caption=str(x)
程序执行后,单击Command1命令按钮,标签中显示的内容是:
3
3.PrivateSubFormClick()
Dima(4)AsInteger,iAsInteger
Fori=1To4
a(i)=a(i-1)*2–1
Printa(i)
程序运行的结果是-1
-3
-7
-15
4.PrivateSubForm_Click()
DimaAsInteger,bAsInteger
A=10:
b=20
Callp(a,b)
Printa,b
PrivateSubp(xAsInteger,byvalyAsInteger)
DimzAsInteger
z=x:
x=y:
y=z
Printx,y
程序运行后,窗体上显示的结果是;
2010
2020
5.PrivateSubForm_Click()
Print“CCCCC”
PrivateSubForm_MouseDowen(ButtonAsInteger,ShiftAsInteger,xAsSingle,yxAsSingle)
IfButton=2Then
Print“AAAAA”
Print“BBBBB”
程序运行后单击鼠标右键,输出的结果是:
AAAAA
BBBBB
CCCCC
6.已知文件Myfile1.txt的内容如图所示,编写如下过程:
DimdateAsString*1
Text1.Text=“”
Open“D\Myfile1.txt”ForInputAs#1
DoWhileNotEOF
(1)
Input#1,date
Text1.Text=Text1.Text&
date
Loop
Close#1
程序运行后,单击窗体,文本框中Text1中的内容是;
123
程序设计题
1.有如下分段函数;
X(x<
1)
Y=3x-12(1≤x<
10)
4x-12(x≥10)
设计一个程序,在输入x值后,输出相应Y的值。
2.分别编写一个判断素数的子过程和函数过程,要求程序运行时输入一个整数,通过条用该子过程和函数过程可以判断该整数是否为素数,
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 复习资料
![提示](https://static.bdocx.com/images/bang_tan.gif)