10.语句PrintNot10>15And8<5+2的输出结果为。
11.日期表达式#2/24/02#-#2/12/02的值为。
12.数学表达式sin2x+
写成等价的VisualBasic表达式为。
13.设某个程序中要用到一个二维数组,要求数组名为A,类型为字符串类型,第一维下标从1到5,第二维下标从-2到6,则相应的数组声明语句为。
14.事件就是在对象上所发生的事情,VisualBasic中的事件如、、等。
一个对象响应的事件可以有个,用户不能建立新的事件。
事件过程是指。
假设某一事件过程如下:
PrivateSubcmd1_Click()Form1.Caption=”VB示例”EndSub则响应该过程的对象名是,事件名是。
15.对象的方法用于。
当方法不需要任何参数并且也没有返回值时,调用对象的方法的格式为,例如,对窗体Form1使用Show方法,应写成。
16.PictureBox控件可通过设置其属性为True使之可自动调整大小;而Image控件可通过设置其属性为True,使其加载的图片能自动调整大小以适应Image。
17.语句Print"VisualBasic";Tab(7)"Hello"表示第二个输出项在第列输出。
当Tab函数的参数小于1(如Tab(-2))时,则第二个输出项在第列输出。
18.在VisualBasic语言中有三种形式的循环结构。
其中,若循环的次数可以适先确定,可使用循环;若要求先判断循环进行的条件,可使用循环或循环。
19.计时器控件在是可见的,在是不可见的。
它在后台每隔一定时间间隔触发相应事件。
20.如果工具箱中还没有CommonDialog控件,则应从菜单中选定,将控件添加到工具箱中。
21.VisualBasic一般用4种类型的文件保存,分别是扩展名为的窗文件,扩展名为的公用标准模块文件,扩展名为的类模块文件和扩展名为的工程文件。
二、单项选择题1.Integer类型的变量可存放的最大整数是(d)。
A、255B、256C、32768D、327672.如果要对程序代码进行注释,可使用的VisualBasic语句为(b)。
A、Let语句B、Rem语句C、Set语句D、Print语句3.下列符号不能作为VB中变量名的是(c)。
A、abcdB、p1234C、89edfD、xyz4.将焦点主动设置到指定的控件或窗体上,应采用的方法是(b)。
A、SetDateB、SetFocusC、SetTextD、GetGate5.若要求从文本框中输入密码时在文本框中只显示*号,则应用在此文本框的属性窗口中设置(d)。
A、Text属性值为*B、Caption属性值为*C、Password属性值为空D、Passwordchar属性值为*6.表达式10+10Mod3*3的值为(a)。
A、11B、2C、13D、6
7.有如下程序段:
Dimstr1AsString*5
str1="VisualBasic"
当该段程序被执行完时,变量str1的值为(b)。
A、"Visual"B、"Visua"C、"V"D、"VisualBasic"
8.数学式子Sin25写成VB表达式是(d)。
A、Sin25B、Sin(25)C、SIN(25)D、Sin(25*3.14/180)
9.Sub过程与Function过程最根本的区别是(d)。
A、Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以。
B、Function过程可以有参数,Sub过程不可以。
C、两种过程参数的传递方式不同。
D、Sub过程的过程名不能返回值,而Function过程能够通过过程名返回值。
10.要使文框显示滚动条,需先设置的属性是(b)
A、AutosizeB、Multiline
C、AlignmentD、Scrollbars
11.下列对象不能响应Click事件的是(d)。
A、列表框B、图片框C、窗体D、计时器
12.在VisualBasic中,按文件的访问方式不同,可以将文件分为(a)。
A、顺序文件、随机文件和二进制文件B、文本文件和数据文件
C、数据文件和可执行文件D、ASCⅡ文件和二进制文件
13.将通用对话框CommonDialog的类型设置成“颜色”对话框,可调用该对话框的(c)方法。
A、ShowOpenB、ShowSaveC、ShowColorD、ShowFont
14.在下列文件类型中,不属于VisualBasic6.0工程文件类型的是(a)。
A、.dswB、.clsC、.vbpD、.frm
15.多窗体程序由多个窗体组体组成,在缺省的情况下,VB在执行应用程序时,总是将(d)指定为启动窗口。
A、不包含任何控件的窗口B、包含控件最多的窗口
C、命名为Form1的窗体D、设计时的第一个窗体
三、指出下列句中的错误,修改或者说明原因。
1.Sum_1和Sum-1都可以作为VB的变量名。
2.变量名的长度最长可达1024个字符。
3.下列程序运行结果:
3,3
OptionExplicit
PrivateSubCommand1_Click()
Dima,bAsInteger
a=3.6
b=3.6
Text1.Text=a
Text2.Text=b
EndSub
4.所谓保存工程,是指保存正在编辑的工程的窗体。
5.Variant是一种特殊的数据类型,可以包含任何种类型的数据。
6.下列程序运行结果为True
PrivateSubCommand1_Click()
a=1
b=2
c=3
Text1.Text=c>a+bOrb-1>c-1Andc+a>aXorbEndSub
7.#12/31/1999#-#12/20/1999#的运算结果是#12/11/1999#
8.可以在窗体的通用部分声明静态变量。
9.使用声明语句建立一个变量后,VisualBasic会自动对数值类型的变量赋初值0,变长的字符串被初始化为一个零长度的字符串“""”,定长字符串用空格填充,Variant变量被初始化为Enpty,布尔型的变量被初始化为False。
10.决定对象是否可见的属性Visible属性,决定对象可用性的属性是Enabled属性。
11.赋值语句的功能是计算表达式值并转换相同类型数据后为变量或控件属性赋值。
12.当图像框Image控件的Stretch属性为True时,Image控件能自动调整自己的尺寸与显示的图片匹配。
13.在标准模块中用Public声明全局变量,使变量在整个应用程序中有效。
14.列表框和文本框一样均没有Caption属性,但都具有Text属性。
15.随机文件以记录为单位读写,二进制文件以字节为单位读写。
16.当使用Call语法时,参数表必须在括号内,Call关键字也可省略。
四、读程序题,写出程序运行结果。
1.
PrivateSubForm_Click()
DimiAsInteger,sAsInteger
Fori=1To10
s=s+i
Ifs>10Then
Prints
s=0
EndIf
Nexti
EndSub
2.
OptionExplicit
PrivateSubCommand1_Click()
StaticSAsInteger
DimiAsInteger
S=1
Fori=1To5
S=S*i
Nexti
PrintS
EndSub
3.
ForX=5To1Step-1
ForY=1To6-X
PrintTab(Y+5);"*";
NextY
Print
NextX
4.
PrivateSubForm_Activate()
Print"aa"&"bb",-5*6,Not2<=3
Print"aa"&"bb";-5*6;Not2<=3
Print
Print"30+60",
Print30+60
?
?
"30+60=";30+60
EndSub
5.
S=0:
T=0:
U=0
ForX=1To3
ForY=1ToX
ForZ=YTo3
S=S+1
NextZ
T=T+1
NextY
U=U+1
NextX
PrintS;T;U
6.写出单击窗体三次后,窗体上的显示结果。
PrivateSubForm_Click()
StaticaAsInteger
DimbAsInteger
b=a+b+1
a=a+b
Print"a=";a,"b=";b
EndSub
7.请写出输入8、9、3、0后窗体上的显示结果。
PrivateSubForm_Click()
DimiAsInteger,sumAsInteger,mAsInteger
sum=0
Do
m=InputBox("请输入m","累加和等于"&sum)
Ifm=0ThenExitDo
sum=sum+m
Loop
Printsum
EndSub
8.请写出在Text1、Text2、Text3中依次输入3、4、5后,单击窗体时Label1的显示结果。
PrivateSubForm_Click()
DimaAsSingle,bAsSingle,cAsSingle
a=Text1.Text:
b=Text2.Text:
c=Text3.Text
Label1.Caption=Str(a*a+2*b*b+3*c*c)
EndSub
9.
PrivateSubForm_Click()
DimiAsInteger,jAsInteger
Fori=1To3
Forj=1Toi
PrintStr(i)+"*"+Str(j)+"=";i*j;
Nextj
Print
Nexti
EndSub
五、编程题
1.设计一个计算程序。
该程序用户界面如图1所示,由四个文本框:
文本框1(text1)、文本框2(text2)、文本框3(text3)、文本框4(text4),和三个按钮:
命令按钮1(command1)、命令按钮2(command2)、命令按钮3(command4)组成.程序运行后,用户按清除按钮,则清除文本框中显示的内容,按计算按钮,则计算三科平均成绩。
单击退出按钮则退出。
图1
PrivateSubCommand1_Click()
Text1.Text=[1][1]
Text2.[2]=""[2]
[3].Text=""[3]
EndSub
PrivateSubCommand2_Click()
IfText1.[4]=""OrText2.Text=[5]OrText3.Text=""Then[4]
MsgBox"成绩输入不全!
"[5]
Else
Text4.Text=([6]+Val(Text2.Text)[6]
+Val(Text3.Text))/[7][7]
End[8][8]
SubEnd
PrivateSubCommand3_Click()
Unload[9][9]
[10]Sub[10]
2.编写程序。
由键盘输入a、b、c的值,判断它们能否构成三角形,如果能够构成三角形,则进行三角形的面积。
程序运行界面如图2所示。
提示:
构成三角形的条件是:
边长大于0,且两边之和大于第三边;三角形面积area的面积计算公式为area=Sqr(s*(s-a)*(s-b)&(s-c)),s=(a+b+c)/2。
PrivateSubCommand1_Click()
DimaAsSingle,bAsSingle,cAsSingle,sAsSingle,areaAsDouble
a=Val(Text1.Text)
[1]
c=Val(Text3.Text)
s=(a+b+c)/2
Ifs>0And(s-a)>0And(s-b)>0And(s-c)>0Then
area=Sqr(s*(s-a)*(s-b)*(s-c))
Label1.Caption="能构成三角形,"&"该三角形的面积为:
"&Str(area)
[2]
Label1.Caption="不能构成三角形。
"
[3]
EndSub
3.输出100~200之间不能被3整除的的数,要求用Do语句的一种形式来实现,程序运行界面如图3所示。
图3
4.设计一个欢迎程序。
该程序用户界面如图4所示。
要求程序运行后,用户选中粗体复选框时“欢迎您!
”几个字的字体变成粗体,用户选中斜体复选框时“欢迎您!
”几个字的字体变成斜体。
若取消选中,则恢复原字体。
按结束,则退出。
图4
5.参考图5,编写程序代码。
要求用户输入商品的“单价”、“数量”和“折扣”后,单击“计算”按纽显示“应付款”,单击“清除”按纽,清除文本框中所有的数据。
6.设计一个计时程序,当程序运行后,单击开始按钮,则开始计时,文本框中显示秒数,按停止按钮,则计时停止。
单击窗口则退出。
该程序用户界面如图5所示。
期末综合练习题
(一)答案
一、填空题
1.创建应用程序界面设置属性编写代码
2.属性、text
3.LabelTextBox
4.Val(s)取整-4
5.txtshow.text="GOODWORK!
"
6.Click()、frm1.show
7.算术表达式字符串表达式关系表达式布尔表达式日期表达式对象表达式运算符
8.1
9.True
10.False
11.12
12.Sin(x)^2+Sqr(x^2-y^2)