内容发布更新时间 : 2024/12/25 21:11:15星期一 下面是文章的全部内容请认真阅读。
习题3
一.单项选择题
1.语句s=s+1的正确含义是( )
A. 变量s的值与s+1的值相等 B. 将变量s的值存到s+1中去 C. 将变量s的值加1后赋给变量s D. 变量s的值为1
2.假设已使用变量声明语句:Dim date_1 As Date,则为变量date_1正确赋值的语句是( )
A. date_1=date(\ B. date_1=#1/1/2005# C. date_1=1/1/2005 D. date_1=\/1/2000#\注:表示日期的字符串转换为日期类型的数据用函数CDate(\3. 下列叙述中正确的是( )
A.一个程序代码行只能写入一个语句。
B.当用Print输出多个输出项时,可以使用冒号“:”作为输出项间的分隔符 C.赋值语句结束时,可以使用分号或逗号作为结束符
D.在字符型数据中,起止界限符必须使用英文的双撇号,而不能使用中文双引号 4.下列程序段执行后,输出结果是( ) a = 0: b = 1
a = a + b: b = a + b Print a; b
a = a + b: b = a + b Print a; b
a = b - a: b = b - a Print a; b
A.1 2 B.3 5 C.1 2 D.1 2 3 4 2 3 3 4 3 5 3 4 1 2 2 3 2 3 5.语句Print \的输出结果为( ) A.Sqr(16)=Sqr(16) B.Sqr(16)=4 C.\ D.4=Sqr(16) 6.设a=\,b=\下列语句能显示\的是( ) A.Print Val(b)-Val(a)
1
B.Print b-a
C.Print b;Chr(45);a D.Print Asc(a) & \7.以下程序段的输出结果是( ) x = \ m = LCase(x): n = UCase(y) Print Mid(m + n, 3, 2)
A.Ca B.cA C.cea D.ca 8.下列程序段执行后,输出结果是( ) Dim a As String * 4 a = \
a$ = \ Print a Print a$
A.Computer B.Comp C.Comp D.Inte Internet Internet Inte Inte 9.以下程序段的运行结果是( ) Const st As String = \ st = \ st = st + \
A.ABCD B.1234 C.ABCDl234 D.显示出错信息 10.以下( )控件不支持DblClick。
A.CommandButton B.PictureBox C.Label D.TextBox 11.要使某控件在程序运行时不起作用,应对其( )属性进行设置。 A.Enabled B.Caption C.Font D.Visible
12.要在Form_Load事件过程中用Print方法在窗体上输出结果,应先调用窗体的( )方法。
A.Move B.Cls C.Show D.Circle
13.若将文本框的( )属性设置为True,则运行时用户不能修改文本框中的内容。 A.Enabled B.Visible C.Locked D.MuhiLine
14.为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的( )属性值设置为True。
2
A.Value B.Default C.Cancel D.Enable 15.假设Text1是某一个文本框的名称,下列语句中正确的是( ) A.Text1.Height=600 B.Text1.Print 123 C.Text1.Caption=\新标题\ D.Text1.Name=\文本框\
16.在Command1_Click ( ) 事件过程中用Dim语句定义一个变量,则( ) A、该变量在Command1_Click ( ) 事件过程中有效 B、该变量在Command1的所有事件过程中有效 C、该变量在本窗体内的所有函数或过程中有效 D、该变量在本工程所有窗体和模块中的函数或过程中有效
17.设有语句:Label1.Caption=InputBox(\输入标题\新标题\旧标题\,执行后,在输入对话框中不输入内容就直接按下回车键,则( )
A.标签Labell的标题内容是“新标题” B.标签Labell的标题内容是“旧标题” C.标签Labell的标题内容不能确定 D.标签Labell的标题内容为空白
注:inputbox的格式为:
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context]) 即第三个字符串参数为默认值.
18.执行语句M = MsgBox(\结束运行吗?\时,显示的消息框是:
A.
B.
C.
D.
19.在默认情况下,InputBox函数返回值的类型为 ( ) A.字符串 B.变体 C.数值 D.数值或字符串
20.MsgBox函数的返回值类型是( ) A.数值 B.日期 C.字符串 D.变体 注:MsgBox函数的返回值为Long类型.
21.要声明一个长度为64个字符的定长字符串变量String1,以下正确的语句是( )
3
A. Dim String1 As String B. Dim String1 As String(64) C. Dim String1 As String[64] D. Dim String1 As String*64 22.能够产生下图所示对话框的正确Visual Basic语句是:
A. x = InputBox(\请输入一个整数:+ vbCrLf + (10-99之间)\计算\
B. x = InputBox(\请输入一个整数:\之间)\计算\C. x = InputBox(\请输入一个整数:(10-99之间)\计算\D. x = InputBox(\请输入一个整数:(10-99之间) + vbCrLf \计算\23.程序运行时,要使文本框(TextBox)获得焦点,则需使用( )方法。 A.Change B.SetFocus C.GotFocus D.Move
24.在窗体上画出一个名为HScroll1的水平滚动条和一个名为Label1的标签。要想通过改变滚动条滑块的位置来调节标签中显示文字的大小,可满足此功能的语句是( ) A.Label1.FontName = HScroll1.Max B.Label1.FontSize = HScroll1.Min C.Label1.FontSize = HScroll1.Value D.Label1.FontBold = HScroll1.Value 25.要使某控件在程序运行时起作用或不起作用,应对其( )属性进行设置。 A.Enabled B.Caption C.Font D.Visible 注:本题与11题相同
26.为了使文本框(TextBox)能够显示多行文字,必须设置的关键属性是( ) A.MaxLength>0 B.MultiLine=True C.ScrollBars=Both D.BorderStyle=None 27.能在当前窗体上输出信息的语句是( )
A.Picture1.Print “你好!” B.Print “你好!” C.Printer.Print “你好!” D.Debug.Print “你好!” 28.单击滚动条两端的任一个滚动箭头,将触发该滚动条的 ( ) 事件。
A.Scroll B.KeyDown C.Change D.DragOver 注:当拖动滚动块时才触发Scroll事件,且释放滚动块后才触发Chang事件。
29.标签和文本框都可以显示文本,它们的主要区别是:( )中文本是只读文本,( )中的文本为可编辑文本。
A.标签;文本框 B.文本框;标签 C.标签;标签 D.文本框;文本框 30.标签控件能显示文本信息,其内容只能用( )属性获得
4
A.Alignment B.Visible C.Caption D.BorderStyle
二.多项选择题
1.要使文本框Textl中的内容为空字符串,可采用( )形式语句
A.Text1.Text=Space(0) B.Text1.Text=0 C.Text1.Text=\ D.Text1.Text=Space(1) E.Cls Textl.Text 2.下列叙述中,正确的是( )
A.Space函数既可以用于表达式,也能用于Print方法 B.Space函数只能用于表达式,不能用于Print方法 C.Spc函数只能用于Print方法,不能用于表达式 D.Spc函数既可以用于表达式,也能用于Print方法 E.Spc函数与Space函数均能生成空格,作用完全相同 3.下列关于Name属性的论述中,正确的是( ) A.所有窗体和控件都有Name属性,其值不能为空 B.对象的Name属性指定对象的名称,用来标识一个对象 C.Name属性值必须以字母(或汉字)开头
D.标签的Name属性值是显示在标签标题(Caption)中的文本 E.Name属性值可以在属性窗口中修改,也可以通过代码来修改 F.\是一个非法的对象名
4.关于消息框函数(MsgBox)描述正确的是( ) A.消息框可以用来显示字符形式的提示信息 B.消息框中至少包含一个选择按钮
C.消息框出现后,用户必须按下其中的一个选择按钮,程序才能继续运行 D.用户按下消息框中的一个选择按钮,则获得反映该按钮类型的相应数值 E.消息框中的提示示信息可以有多行,最大长度为1024个字符 5.为了使文本框Text1显示垂直滚动条,必须设置的属性值是( ) A.AutoSize = True B.MultiLine = True C.MaxLength = 20 D.ScrollBars = Vertical E.BorderStyle = 1
三.填空题
5