VB书后习题

1.6习题1．选择题（1）与传统的程序设计语言相比，VB最突出的特点是（C）。A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术（2）在正确安装VB6.0后，可以通过多种方式启动VB，以下方式中，不能启动VB的是（C）。A．通过“开始”菜单中的“程序”命令B．通过“我的电脑”找到vb6.exe，双击该文件名C．通过“开始”菜单中的“运行”命令D．进入DOS方式，执行vb6.exe文件（3）为了用键盘打开菜单和执行菜单命令，第一步应该按的键是（A）。A．功能键F10或AltB．Shift+功能键F4C．Ctrl或功能键F8D．Ctrl+Alt（4）VB6.0集成环境的主窗口中不包括（C）。A．标题栏B．菜单栏C．状态栏D．工具栏（5）用标准工具栏中的工具按钮不能执行的操作是（B）。A．添加工程B．打印源程序C．运行程序D．打开工程（6）VB窗体设计器的主要功能是（A）。A．建立用户界面B．编写源程序代码C．画图D．显示文字2.4习题1．选择题（1）下面4个选项中，不是窗体属性的是（A）。A．UnloadB．BorderStyleC．MinButtonD．Caption（2）确定一个窗体或控件大小的属性是（A）。A．Width和HeightB．Width或HeightC．Top和LeftD．Top或Left（3）当窗体最小化时缩小为一个图标，设置这个图标的属性是（B）。A．MouseIconB．IconC．PictureD．MousePointer（4）为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是（D）。A．ControlBoxB．MinButtonC．EnabledD．MaxButton（5）设计窗体时双击窗体的任何位置，将打开（B）。A．窗口设计器B．代码窗口C．工具箱窗口D．属性窗口（6）为了使文本框同时具有水平和垂直滚动条，应该先把MultiLine属性设置为True，然后再把ScrollBars属性设置为（D）。A．0B．1C．2D．3（7）使文本框获得焦点的方法是（C）。A．ChangeB．GotFocusC．SetFocusD．LostFocus（8）为了使标签覆盖背景，应把BackStyle属性设置为（B）。A．0B．1C．TrueD．False（9）已将文本框的ScrollBars属性设置为3，却看不到任何效果，原因是（C）。A．文本框中没有内容B．文本框的Locked属性值为TrueC．文本框的MultiLine属性值为FalseD．文本框的MultiLine属性值为True（10）在窗体上有一个文本框Text1和一个标签Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中（如图2-20示），则空白处应填入的内容是（C）。PrivateSubText1___________()Label1.Caption=Text1.TextEndSubA．GetFocusB．ClickC．ChangeD．LostFocus图2-20（11）在窗体（Form1）上画两个文本框（Text1和Text2）和一个命令按钮（Command1），然后编写如下两个事件过程：PrivateSubCommand1_Click()a=Text1.Text+Text2.TextPrintaEndSubPrivateSubForm_Load()Text1.Text=““Text2.Text=““EndSub程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（C）。A．444B．321123C．123321D．132231（12）复选框是否被选中，取决于复选框的（B）。A．Enabled属性B．Value属性C．Checked属性D．Visible属性（13）在窗体上有一个文本框控件，名称为TextTime；一个计时器控件，名称为Timer1。要求每1s在文本框中显示一次当前的时间。在下划线上应填入的内容是（C）。PrivateSubTimer1____________()Texttime.Text=TimeEndSubA．EnabledB．VisibleC．TimerD．Interval（14）用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（C）。A．ListB．ListIndexC．TextD．ListCount（15）要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的MultiSelect属性设置为（B）。A．0B．1C．2D．其他（16）使图像控件（Image）中的图像自动适应控件的大小应将控件的（D）。A．AutoSize属性设为FalseB．AutoSize属性设为TrueC．Stretch属性设为FalseD．Stretch属性设为True（17）当拖动滚动条中的滑块时，将触发滚动条的事件是（C）。A．MoveB．ChangeC．ScrollD．SetFocus（18）使用菜单编辑器设计菜单时，必须输入的项是（D）。A．快捷键B．标题C．索引D．名称（19）下列不能打开菜单编辑器的操作是（D）。A．按Ctrl+E键B．单击工具栏中的“菜单编辑器”按钮C．执行“工具”菜单中的“菜单编辑器”命令D．按Shift+Alt+M键（20）假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为（A）。A．MenuItem.Enabled=FalseB．MenuItem.Enabled=TrueC．MenuItem.Visible=TrueD．MenuItem.Visible=False2．填空题（1）为了使标签能自动调整大小以显示全部文本内容，应把标签的__Autosize___属性设置为True。（2）文本框接受的最长字符数由文本框的___Maxlength___属性确定。（3）要想在文本框中显示垂直滚动条，必须把Scrollbars属性设置为2，同时还应把__MultiLine____属性设置为True。（4）窗体上已经建立多个控件，如Text1、Command1、Label1，若要使程序开始运行时焦点定位在Command1控件上，则应将Command1控件的___TabIndex___属性值设置为0。（5）窗体、图片框或图像框中图形通过对象的__Picture____属性设置。（6）计时器事件之间的间隔通过___Interval___属性设置。（7）组合框是文本框和__列表框___特性的组合。3.7习题1．选择题（1）设变量D为Date型、A为Integer型、S为String型、L为Long型，下面赋值语句中不能执行的是（B）。A.D=#12：30：00PM#B.A=”3277e1”C.S=NowD.L=”4276D3”（2）下面表达式中（D）的值是整型（Integer或Long）。①36+4/2②123+Fix(6.61)③57+5.5\2.5④356&21⑤“374”+258⑥4.5Mod1.5A.①②④⑥B.③④⑤⑥C.②④⑤⑥D.③⑥（3）表达式Val(“1234.67E-3ab789”)的值为（B）。A.1234.67B.1.23467C.1234.67789D.表达式出错（4）在文本框Text1中输入数字12，在文本框Text2中输入数字34，执行以下语句，只有（B）可使文本框Text3中显示46。A.Text3.Text=Text1.Text&Text2.TextB.Text3.Text=Val(Text1.Text)+Val(Text2.Text)C.Text3.Text=Text1.Text+Text2.TextD.Text3.Text=Val(Text1.Text)&Val(Text2.Text)（5）数学式yxxex3sin所对应的正确VB算术表达式是（D）。A.Abs(e^x+Sinx^3/Sqr(x+y))B.Abs((e^x+Sinx^3)/Sqr(x+y))C.Abs(Exp(x)+Sinx^3)/Sqr(x+y))D.Abs(Exp(x)+Sin(x)^3)/Sqr(x+y))（6）对正实数x的第四位小数四舍五入的VB表达式是（D）。A.0.001*Int(x+0.0005)B.0.001*(1000*x+0.5)C.0.001*Int(1000*x+5)D.0.001*Int(1000*(x+0.0005))（7）函数CInt、Int、Fix都返回整数值，以下能正确描述它们返回值的大小关系的是（A）。A.CInt(-4.51)=Int(-4.51)Fix(-4.51)B.Int(-4.51)CInt(-4.51)Fix(-4.51)C.CInt(-4.51)Fix(-4.51)Int(-4.51)D.Int(-4.51)Fix(-4.51)=CInt(-4.51)（8）设Mys1,Mys2均为字符串型变量，Mys1=”VisualBasic”,Mys2=”b”,则下面关系表达式中结果为True的是（D）。A．Len(Mys1)2*instr(Mys1,”l”)B．Mid(Mys1,8,1)Mys2C．Chr(98)&Right(Mys1,4)=”Basic”D．Instr(Left(Mys1,6),”a”)+60Asc(Ucase(Mys2))（9）可以把变长字符串S中的第一个“ABC”子串，替换成“1234”的语句是（D）。A.S=Left(S,InStr(S,”ABC”))&”1234”&Right(S,Len(S)-InStr(S,”ABC”)-2)B.Mid(S,InStr(S,“ABC”),3)=”1234”C.Mid(S,InStr(S,“ABC”),4)=”1234”D.S=Left(S,InStr(S,“ABC”)-1)&“1234”&Right(S,Len(S)-InStr(S,“ABC”)-2)(10)设x=8，y=3，则以下不能在窗体上显示出“A=11”的语句是（A）。A.PrintA=x+yB.PrintA=;x+yC.PrintA=+Str(x+y)D.PrintA=&x+y(11)在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：PrivateSubCommand1_Click()a=InputBox(Enteraninteger)b=InputBox(Enteraninteger)Text1.Text=b+aEndSub程序运行后，单击命令按钮，如果在输入对话框中分别输入3和10，则文本框中显示的内容是（D）。A.出错B.13C.310D.103(12)设a=2,b=3,c=4,d=5,下列表达式的值是（D）。Nota=cOr4*c=b^2Andba+cA.-1B.1C.TrueD.False(13)假定有如下的命令按钮(名称为Command1)事件过程：PrivateSubCommand1_Click()I=InputBox(输入：，,输入整数)MsgBox输入的数据是：”，，”输入数据：+IEndSub程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（B）。A.I的值是数值10B.输入对话框的标题是“输入整数”C.信息框的标题是“输入数据：10”D.信息框中显示的是“输入的数据是：”(14)下列叙述中正确的是（C）。A.MsgBox语句的返回值是一个整数B.执行Msgbox语句并出现信息框后,不用关闭信息框即可执行其他操作C.MsgBox语句的第一个参数不能省略D.如果省加略MsgBox语句的第三个参数(Title),则信息框的标题为空(15)把数学表达式(5x+3)/(2y-6)表示为正确的VB表达式应该是（D）。A.(5x+3)/(2y-6)B.x*5+3/2*y-6C.(5*x+3)D.(x*5+3)