知道智慧树VB面向对象程序设计（山东联盟）满分测试答案

第一章测试1【单选题】(9分)一个应用程序________窗体。A.可以没有B.只许有一个C.应该有两个D.可包括多个2【单选题】(9分)在一个工程中可以有多个__________。A.资源文件B.机器代码文件C.窗体文件D.工程文件3【单选题】(9分)工程资源管理器窗口标题栏下的________按钮用于切换到“窗体编辑窗口”，显示和编辑正在设计的窗体。A.“查看对象”按钮B.“查看文件夹”按钮C.“查看代码”按钮D.“切换文件夹”按钮4【单选题】(9分)在一个工程中可以有多个__________。A.资源文件B.工程文件C.标准模块文件D.机器代码文件5【单选题】(9分)在代码窗口中，当从对象列表框中选择了某一对象后，在______中会列出适用该对象的事件。A.属性窗口B.过程框C.事件列表框D.布局窗口6【单选题】(9分)保存一个工程至少应保存两个文件，这两个文件分别是_______。A.类模块文件和工程文件B.窗体文件和标准模块文件C.窗体文件和工程文件D.文本文件和工程文件7【单选题】(9分)工程文件的扩展名是________。A.frxB.basC.vbpD.frm8【单选题】(9分)窗体文件的扩展名是________。A.frmB.vbpC.basD.vbg9【单选题】(9分)标准模块文件的扩展名是________。A.frmB.vbpC.frxD.bas10【单选题】(9分)VisualBasi的MSDN帮助窗口最明显的特征是________。A.保持了浏览器的特征B.具有Windows风格C.与VisualBasic编辑窗口相似D.具有MicrosoftOffice应用程序窗口风格11【单选题】(10分)VisualBasic窗体设计器的主要功能是________。A.建立用户界面B.画图C.显示文字D.编写源程序代码第二章测试1【单选题】(5分)设有一名称为txtName的文本框，则下列能使其具有输入焦点的语句是________。A.Focus=TrueB.txtName.SetFocusC.txtName=SetFocusD.txtName.SetFocus=True2【单选题】(5分)下列说法中的是________。A.事件过程是指响应某个事件后执行的一段程序代码B.VisualBasic是采用对象驱动编程机制的语言C.一个对象可以识别一个或多个事件D.事件是VisualBasic预置的，且能够被对象识别的动作3【单选题】(5分)在运行时，如果按Tab键跳过了一个可以获得焦点的控件（如文本框），其原因可能是________。A.该控件的Locked属性值为TrueB.该控件的TabStop属性值为TrueC.该控件的Enabled属性值为TrueD.该控件的TabStop属性值为False4【单选题】(5分)设窗体上有一个文本框Text1，程序代码中有以下赋值语句（假定用到的控件和变量都存在），其中的是________。A.Text1.Text=89B.Text1.Caption=89C.Text1.MaxLength=30D.Text1.FontBold=True5【单选题】(5分)假定Picture1和Text1分别为图片框和文本框的名称，则下列语句中的是________。A.Debug.Print100B.Text1.Print100C.Picture1.Print100D.Print1006【单选题】(5分)在设计阶段，当双击窗体上的某个控件时，所打开的窗口是_______。A.工程资源管理器窗口B.工具箱窗口C.布局窗口D.代码窗口7【单选题】(5分)一个可执行的VB应用程序至少要包括一个_______。A.辅助模块B.类模块C.窗体模块D.标准模块8【单选题】(5分)下列叙述中的是_______。A.事件可以由用户引发，也可以由系统引发B.保存VisualBasic程序时,应分别保存窗体文件及工程文件C.VisualBasic应用程序只能以解释方式执行D.打开一个工程文件时,系统自动装入与该工程有关的窗体文件9【单选题】(5分)用户可通过_______模拟的屏幕小图像来布置应用程序界面。A.立即窗口B.窗体设计器C.快捷菜单D.窗体布局窗口10【单选题】(5分)在窗体上添加一个文本框，名称为text1，然后编写如下的load事件过程，则程序的运行结果是__________。PrivateSubForm_LoadText1.Text=""Text1.SetFocusFork=1to5t=t*kNextkText1.Text=tEndSubA.出错B.在文本框中显示120C.在文本框中显示1D.文本框中仍为空11【单选题】(5分)保存一个工程至少应保存两个文件，这两个文件分别是__________。A.窗体文件和标准模块文件B.类模块文件和工程文件C.窗体文件和工程文件D.文本文件和工程文件12【单选题】(5分)标签控件能够显示文本信息，文本内容只能用__________属性来设置。A.VisibleB.BorderStyleC.CaptionD.Alignment13【单选题】(5分)若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口设置__________。A.Caption属性值为*B.Passwordchar属性值为*C.Password属性值为空D.Text属性值为*14【单选题】(5分)若要使用户不能修改文本框TextBox1中显示的内容，应设置__________属性。A.ScrollBarB.LockedC.PassWordCharD.MultiLine15【单选题】(5分)能够获得一个文本框中被选取文本的内容的属性是__________。A.TextB.SeltextC.SelStartD.Length16【单选题】(5分)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()Move500,500EndSub程序运行后，单击命令按钮，产生的结果为________。A.将命令按钮向左、上方向各移动500B.将命令按钮移动到距窗体左边界、上边界各500的位置C.将窗体向左、上方向各移动500D.将窗体移动到距屏幕左边界、上边界各500的位置17【单选题】(5分)在设计阶段，通过属性窗口为命令按钮的Picture属性装入一个图形，但没有显示，其原因是________。A.按钮的Default属性值为FalseB.按钮的Style属性值为0C.没有用按钮的DisabledPicture属性装入图形D.按钮的Enabled属性值为False18【单选题】(5分)对于命令按钮，下列说法中正确的是________。A.Default属性设置为True时，表示按Esc键与单击该命令按钮作用相同B.支持DblClick事件C.通过Picture属性可以给命令按钮指定一个图形D.Cancel属性设置为True时，表示按Enter键与单击该命令按钮作用相同19【单选题】(5分)以下叙述中，的是________。A.可以将计时器控件的Enabled属性设置为False，使其不能自动触发Timer事件B.在设计阶段不能调整通用对话框控件的大小C.如果文本框的TabStop属性值为False，则不能接收从键盘上输入的数据D.当文本框失去焦点时，触发其LostFocus事件20【单选题】(5分)下列叙述中不正确的是_______。A.注释语句可以单独写在一行B.注释语句是非执行语句，仅对程序的有关内容起注释作用C.注释语句可以放在程序代码中的任何位置D.向程序代码中加入注释语句的目的是提高程序的可读性第三章测试1【单选题】(3分)如果要在任何新建的模块中自动插入OptionExplicit语句，则应采用下列__________操作步骤。A.在“工程”菜单中执行“添加文件”命令B.在“工具”菜单中执行“插入文件”命令C.在“编辑”菜单中执行“插入文件”命令D.在“工具”菜单中选取“选项”命令，打开选项对话框，单击“编辑器选项卡”选中“要求变量声明”选项2【单选题】(3分)声明一个变量为局部变量应该用__________。A.StaticB.GlobalC.PublicD.Private3【单选题】(3分)以下能作为VisualBasic变量名的是__________。A.E-12B.E1C.12-ED.12.54【单选题】(3分)数学表达式3≤x<10在VB中的逻辑表达式为__________。A.3<=xANDx<10B.3<=xAND<10C.x>=3ORx<10D.3<=x<105【单选题】(3分)下列选项中，为字符串常量的是__________。A.6，12，2001#B.＂6／12／2001＂C.6／12／2001D.#6，12，2001#6【单选题】(3分)用户自定义数据类型时，其成员不能是__________。A.变长字符串B.变长字符串和货币型C.定长字符串和数组D.货币型和日期型7【单选题】(3分)若要处理一个值为50000的整数，应采用哪种VB基本数据类型描述更合法？__________A.LongB.SingleC.IntegerD.String8【单选题】(4分)下面__________是合法单精度型变量。A.num!B.mm#C.xinte$D.sum%9【单选题】(5分)下面__________是不合法的整常数A.%100B.&O100C.100D.&H10010【单选题】(5分)假设变量intVar是一个整型变量，则执行赋值语句intVar="2"+3之后，变量intVar的值是__________。A.23B.3C.5D.211【单选题】(5分)下列各声明语句中的是________。A.DimTestAsString='计算机等级考试'B.ConstCountry='English'C.Staticv1D.PublicSumAsInteger12【单选题】(5分)设a=4，b=5，c=6，执行语句：Printa<bAndb<c，窗体上显示的是________。A.出错信息B.0C.FalseD.True13【单选题】(5分)以下说法中，正确的是________。A.表达式Chr(Asc('A'))=UCase('a')的值为FalseB.表达式Int(Rnd())的值是0C.表达式-10Mod3的值为1D.利用关系表达式x/2=Int(x/2)不能判断变量x的值为偶数14【单选题】(5分)设有如下的记录类型：PrivateTypeEmployeenumAsStringnameAsStringEndType则下列语句中正确的是________。A.E='Tom'B.DimeAsEmployee='1001'&'John'C.DimeAsEmployeeD.DimeAsTypeEmployee15【单选题】(5分)VisualBasic中，日期"1999年6月18日"的表达形式为________。A.{6/18/1999}B.{1999/6/18}C.#6/18/1999#D.1999/6/1816【单选题】(5分)执行语句PrintSgn(-2^3)+Abs(Int(-12.2)Mod100Sqr(100))的输出结果为________。A.2B.1C.3D.417【单选题】(5分)表达式(-1)*Sgn(-100+Int(Rnd*100))的值是________。A.-1B.随机数C.1D.018【单选题】(5分)下列逻辑表达式中，能正确表示条件"x和y都是奇数"的是________。A.xMod2=0AndyMod2=0B.xMod2=1AndyMod2=1C.xMod2=1OryMod2=0D.xMod2=0OryMod2=019【单选题】(5分)表达式Int(Rnd()*11)+10的值的范围是________。A.整数10~20（不含10和20）B.整数0~20（含0和20）C.整数0~11（含0和11）D.整数10~20（含10和20）20【单选题】(5分)若变量P的值为-3，则-P^2的值是________。A.9B.6C.-9D.-621【单选题】(5分)VisualBasic数据类型中，占用内存最小的是________。A.IntegerB.ByteC.BooleanD.Single22【单选题】(5分)下面是VisualBasic合法变量名的是________。A.10BB.PrintAC.B#CD.Debug23【单选题】(5分)以下不是VisualBasic合法常量的是________。A.#1/20/2014#B.&H12&C.&O12D.'a'第四章测试1【单选题】(5分)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimiAsIntegerDimnumAsIntegerDimnAsIntegern=0RandomizeFori=1To10num=Int(Rnd*10)+1SelectCasenumMod2Case1ExitForCase0Printnumn=n+1EndSelectNextiPrint"n=";nEndSub下面有关描述中正确的是________。

A.num的值是1~11之间的整数B.程序运行过程中，变量num共被赋值10次C.变量n的作用是累计自过程运行开始到结束所产生的偶数个数D.当num的值为偶数时，则For循环将被终止2【单选题】(5分)在窗体上画一个名称为Command1的命令按钮，并编写如下程序代码：PrivateConstNUMAsInteger=10PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=1b=NUMDoUntilb>NUMa=a*NUMb=b+1LoopPrintaEndSub则当程序运行时，单击Command1后，在窗体上的输出结果是________。A.1B.10C.100D.213【单选题】(6分)已知文本框Text1中输入了一篇英文短文，并编写了如下程序段：Str_x=Text1.Textn=Len(Str_x)m=0t=0Fori=1Tonw=UCase(Mid(Str_x,i,1))Ifw>="A"Andw<="Z"ThenIft=0Thenm=m+1t=t+1Elset=0EndIfNextPrintm该程序段的功能为统计并输出英文短文中________。A.单词的个数B.首字母大写的单词的个数C.字母的个数D.大写字母的个数4【单选题】(6分)设窗体上有文本框Text1和命令按钮Command1，并编写了下面的过程：PrivateSubCommand1_Click()ch$=""x%=Val(Text1.Text)k=2Fork=2Tox/2IfxModk=0Thench=ch&""&kEndIfNextkPrintchEndSub程序运行后，在文本框中输入28，单击命令按钮，则输出是________。

A.24714B.135791113C.2468101214D.147425【单选题】(6分)设有如下程序段：DimxAsIntegerx=Val(InputBox("输入变量x的值"))SelectCasexCase________________Print"*"CaseElsePrint"#"EndSelect以上程序段的功能是，当变量x的值在5到10之间，或者大于20时，输出"*"，其它情况输出"#"，则程序中横线处应填入的内容是________。A.5-10Orx>20B.5To10:x>20C.5To10,Is>20D.x>=5Andx<=10=""or=""x="">206【单选题】(6分)设a、b、c为整型变量，其值分别为4、5、6。以下程序段的输出结果是________。a=b:b=c:c=aPrinta;b;cA.654B.456C.564D.5657【单选题】(6分)以下Case子句中的是________。A.CaseIs>10AndIs<50B.Case0To10C.CaseIs>10D.Case3,5,Is>108【单选题】(6分)有如下程序代码：PrivateSubForm_Click()X=8IfX>8ThenPrint"X>8"ElseIfX<10ThenPrint"X<10"ElseIfX=8ThenPrint"X=8"EndIfEndSub运行程序，单击窗体，输出结果是________。A.X=8B.X<10C.X<10X=8D.不确定9【单选题】(6分)在窗体上画一个名称为Label1的标签，然后编写如下事件过程：PrivateSubForm_Click()DimSAsIntegerS=0Fori=1To15x=2*i-1IfxMod3=0ThenS=S+1EndIfNextiLabel1.Caption=SEndSub运行程序，单击窗体，标签中显示的是________。A.27B.1C.45D.510【单选题】(6分)执行下面的程序段后，x的值为________。x=5Fori=1to20Step2x=x+i5NextiA.23B.21C.24D.2211【单选题】(6分)在窗体中画一个命令按扭，然后编写以下事件过程：PrivateSubCommand1_Click()Fori=1to4x=4Forj=1to3x=3Fork=1to2k=k+6NextkNextjNextiPrintxEndSub程序执行结果为________。A.3B.157C.15D.15812【单选题】(6分)对语句Ifx=1Theny=1,下列说法正确________。A.x=1和y=1均为赋值语句B.x=1是关系表达式，y=1是赋值语句C.x=1和y=1均为关系表达式D.x=1是赋值语句，y=1是关系表达式13【单选题】(6分)设有如下程序：PrivateSubCommand1_Click()DimsumAsDouble,xAsDoublesum=0Fori=1To5x=n/in=n+1sum=sum+xNextEndSub该程序通过For循环计算一个表达式的值，这个表达式是________。A.1+1/2+1/3+1/4+1/5B.1+1/2+2/3+3/4+4/5C.1+1/2+2/3+3/4D.1/2+2/3+3/4+4/514【单选题】(6分)在窗体上画一个名称为Command1的命令按扭和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程:PrivateSubCommand1_Click()n%=Text1.TextSelectCasenCase1to20x=10Case2,4,6x=20CaseIs<10x=30Case10x=40EndSelectText2.Text=xEndSub程序运行后，如果在文本框Text1中输入10，然后单击命令按扭，则在Text2中显示的内容是________。A.40B.30C.20D.1015【单选题】(6分)以下叙述中，的是________。A.MsgBox函数的返回值为一整数B.可以用MsgBox函数输出一条信息C.有语句：x=InputBox("输入：","输入整数")，则该语句打开的对话框的标题是"输入整数"D.InputBox函数的返回值类型由用户在输入对话框中输入数据的类型决定16【单选题】(6分)在DoWhile...Loop循环结构中Loop语句的作用是________。A.退出循环，返回到程序开始处B.转移到DoWhile语句行，开始下一次判断和循环C.终止循环，将控制转移到本循环结构Loop后面的第一条语句继续执行D.该语句在DoWhile...Loop循环结构中不起任何作用17【单选题】(6分)设a=6，则执行x=IIf(a<6,-1,0)后，x的值是________。A.-1B.6C.0D.5第五章测试1【单选题】(4分)在窗体模块的通用声明段中声明变量时，不能使用__________关键字。A.StaticB.PrivateC.DimD.Public2【单选题】(4分)使用ReDimPreserve可以改变数组__________。A.改变维数和所有维的大小B.所有维的大小C.第一维的大小D.最后一维的大小3【单选题】(4分)下列关于ReDim的说法中的是__________。A.在一个程序中，可以多次用Redim语句定义同一个数组。B.ReDim语句可以改变数组类型。C.ReDim语句只能改变元素的个数，但不能改变数组的维数。D.可以用ReDim语句直接定义数组。4【单选题】(4分)以Dimx(6，2To5)来声明一个二维数组，的选项是__________。A.LBound(x,1)的返回值是0B.UBound(x,1)的返回值是6C.LBound(x,2)的返回值是1D.UBound(x,2)的返回值是55【单选题】(4分)下面的数组声明语句中正确的是__________。A.DimA(3;4)AsIntegerB.DimA[3,4]AsIntegerC.DimA(3,4)AsIntegerD.Dima[3;4]AsInteger6【单选题】(4分)语句Dimabc(-2To4,0To4,5)AsLong定义的三维数组，其数组元素有__________。A.210个B.112个C.140个D.96个7【单选题】(4分)下面的数组声明语句中正确的是__________。A.Dimgg(1To5)AsStringB.Dimgg[1,5]AsStringC.Dimgg[1:5,1:5]AsStringD.Dimgg[1To5,1To5]AsString8【单选题】(4分)用Dimb(-2To4)AsString语句所定义的数组元素个数是__________个。A.4B.2C.6D.79【单选题】(4分)定义10个单精度实型一维数组正确的语句是__________。A.OptionBase1：Dima(9)B.Dima(9)AsSingleC.Dima(10)AsIntegerD.Dim#(9)10【单选题】(4分)以下属于VisualBasic合法的数组元素是__________。A.x8B.v[8]C.x[8]D.s(0)11【单选题】(4分)在窗体上画一个名称为Command1的命令按钮，然后编写如下程序代码：OptionBase1Dimarr()AsIntegerPrivateSubCommand1_Click()DimiAsInteger,jAsIntegerDimsAsIntegerReDimarr(4,2)s=0Fori=1To3Forj=1To2arr(i,j)=i+jNextjNextiReDimPreservearr(4,4)Forj=3To4arr(3,j)=j+10NextjFori=1To4s=s+arr(i,i)NextiPrintsEndSub程序运行过程中，当单击Command1时，输出结果为________。A.18B.程序出错C.19D.012【单选题】(4分)运行如下程序PrivateSubCommand1_Click()Dima(5,5)AsIntegerFori=1To5Forj=1To4a(i,j)=i*2+jIfa(i,j)/7=a(i,j)7Thenn=n+1EndIfNextjNextPrintnEndSub则n的值是________。A.3B.4C.2D.513【单选题】(4分)若在窗体上画了一个名称为List1的列表框，并编写了如下事件过程：PrivateSubForm_Load()List1.AddItem"数学"List1.AddItem"物理"List1.AddItem"化学"List1.AddItem"外语"List1.AddItem"语文"EndSubPrivateSubForm_Click()List1.RemoveItem1List1.RemoveItem2EndSub运行程序后，单击窗体，则列表框中显示的项目是________A.化学外语语文B.数学外语语文C.物理外语语文D.数学化学语文14【单选题】(4分)设窗体上有一个列表框控件List1，含有若干列表项。以下能表示当前被选中的列表项内容的是________。A.List1.IndexB.List1.TextC.List1.ListIndexD.List1.List15【单选题】(4分)假定列表框List1中没有被选中的项目，则执行List1.RemoveItemList1.ListIndex语句的结果是________。A.出错B.删除第一项C.删除最后一项D.删除最后加入列表中的一项16【单选题】(4分)设组合框Combo1中有5个项目，则以下能删除最后一项的语句是________。A.Combo1.RemoveItem5B.Combo1.RemoveItemCombo1.ListCount+1C.Combo1.RemoveItem4D.Combo1.RemoveItemCombo1.ListCount17【单选题】(4分)设在程序开始处有语句：OptionBase0，则下面定义的数组中正好有12个元素的是________。A.Dims%(3,2)B.Dima%(12)C.Dima%(-6To6)D.Dims%(3,4)18【单选题】(4分)在窗体上画一个名称为List1的列表框和一个名称为Text1的文本框，然后编写如下两个事件过程：PrivateSubForm_Load()List1.AddItem"100"List1.AddItem"200"List1.AddItem"300"List1.AddItem"400"Text1.Text=""EndSubPrivateSubList1_DblClick()a=List1.TextPrinta+Text1.TextEndSub程序运行后，在文本框中输入"500"，然后双击列表框中的"400"，则输出结果为________。A.500400B.0C.400500D.90019【单选题】(4分)设窗体上有一个名称为Option1的单选按钮数组（其下标从0开始），共有4个单选按钮，并有下面事件过程：PrivateSubOption1_Click(IndexAsInteger)n=IndexIfIndex<3Thenn=n+1PrintOption1(n).CaptionEndSub程序运行时，单击其中一个单选按钮，则在窗体上显示的是________。A.被选中单选按钮的下一个按钮的标题，但如果选中的是最后一个，则显示该单选按钮的标题B.被选中的单选按钮的标题C.被选中单选按钮的下一个按钮的标题，但如果选中的是最后一个，则显示最前面一个单选按钮的标题D.被选中单选按钮的上一个按钮的标题，但如果选中的是最前面的一个，则显示最后面按钮的标题20【单选题】(4分)在窗体上画一个名称为Command1的命令按钮和一个名称为Label1的标签，然后编写如下程序代码：OptionBase0PrivateSubCommand1_Click()Dima(5)AsInteger,nAsIntegerFori=0To5a(i)=in=n+a(i)NextiLabel1=nEndSub运行程序，单击命令按钮，在标签中显示的内容是________。A.10B.20C.5D.1521【单选题】(4分)在窗体上画一个名称为Command1的命令按钮，然后编写如下程序代码：OptionBase1PrivateSubCommand1_Click()Dima(5)AsStringDimiAsIntegerDimbAsVariantFori=LBound(a)ToUBound(a)a(i)=Chr(Asc("a")+(26-i))NextiForEachbInaPrintb;NextEndSub程序运行时，单击Command1，则输出结果是________。A.出错B.12345C.zyxwvD.abcde22【单选题】(4分)在窗体上画一个列表框List1、一个组合框Combo1和一个文本框Text1，编写如下程序代码：PrivateSubForm_Load()List1.AddItem"111"List1.AddItem"222"List1.AddItem"333"Combo1.AddItem"444"Combo1.AddItem"555"Combo1.AddItem"666"Text1.Text=""EndSub程序运行后，如果单击窗体，要求在文本框中显示"222555"，以下能实现该操作的事件过程是________。A.PrivateSubForm_Click()Combo1.ListIndex=1List1.ListIndex=1Text1.Text=List1.Text+Combo1.TextEndSubB.PrivateSubForm_Click()Text1.Text=List1.ListIndex(1)+Combo1.ListIndex(1)EndSubC.PrivateSubForm_Click()Text1.Text=List1.ListIndex(2)+Combo1.ListIndex(2)EndSubD.PrivateSubForm_Click()Combo1.ListIndex=2List1.ListIndex=2Text1.Text=List1.Text+Combo1.TextEndSub23【单选题】(4分)组合框兼有两种控件的特性，这两种控件是________。A.标签和列表框B.复选框和单选按钮C.列表框和文本框D.标签和文本框24【单选题】(4分)下列说法中正确的是________。A.当按下键盘上任意键时都会触发KeyPress事件B.用Erase语句可以清除静态数组中各元素的值，但不释放其所占的内存空间C.用Array函数可以对任何数组初始化D.语句Dimx[1To5]AsDouble能够定义一个一维数组x25【单选题】(4分)列表框控件List1中已有若干个列表项，以下能表示被选中列表项内容的表达式是________。A.List1.ListIndexB.List1.List(ListIndex)C.List1(List1.ListIndex)D.List1.List(List1.ListIndex)第六章测试1【单选题】(3分)定义过程的格式中，Static关键字的作用是指定过程中的局部变量在内存中的存储方式。若使用了Static关键字，则__________。A.每次调用此过程，该过程中的局部变量都会被重新初始化B.每次调用此过程时，该过程中的局部变量的值保持在上一次调用后的值C.在本过程中使用到的，在其他过程中定义的变量也为Static型D.定义了该过程中定义的局部变量为“自动”变量2【单选题】(3分)在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用__________关键字在过程中定义局部变量。A.DimB.PublicC.StaticD.Private3【单选题】(3分)根据变量的作用域，可以将变量分为3类，分别为__________。A.局部变量、模块变量和标准变量B.局部变量、标准变量和全局变量C.局部变量、模块变量和全局变量D.局部变量、模块变量和窗体变量4【单选题】(3分)下列关于过程叙述不正确的是__________。A.过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的B.无论过程传值调用还是过程传址调用，参数传递都是双向的C.过程的传值调用是将实参的具体值传递给形参D.过程的传址调用是将实参在内存的地址传递给形参5【单选题】(3分)要想从子过程调用后返回两个结果，下面子过程语句说明合法的是__________。A.Subf1(ByValn%,m%)B.Subf1(n%,ByValm%)C.Subf2(ByValn%,ByValm%)D.Subf1(n%,m%)6【单选题】(3分)下列定义为abc的过程定义语句中正确的是__________。A.Publicabc(x,y)B.PrivateSubabc(x,y)AsIntegerC.DimSubabc(x,y)D.Subabc(x,y)7【单选题】(5分)有如下函数过程：Functiongys(ByValXAsInteger,ByValYAsInteger)AsIntegerDoWhileY<>0reminder=XModYX=YY=reminderLoopgys=XEndFunction以下调用函数的事件过程，该程序的运行结果是__________。PrivateSubCommand7_Click()DimaAsIntegerDimbAsIntegera=100b=25X=gys(a,b)PrintXEndSubA.25B.100C.50D.08【单选题】(3分)已知过程定义的首行为Subsum(aAsInteger,bAsInteger)，则下面过程调用语句中正确的是________。A.sum(x,y)B.sumx,yC.Callsum(x;y)D.sumx;y9【单选题】(3分)设有如下程序代码：Dima%Publicb%,c%PrivateSubForm_Click()Dimb%Printa;b;cEndSubPrivateSubForm_Load()Dima%a=5b=8c=10EndSub运行程序时单击窗体，则在窗体上显示的是________。A.0010B.0810C.5810D.501010【单选题】(3分)设有以下程序片段：Publicx%Privatey$PrivateSubCommand1_Click()Dima……EndSubPrivateSubCommand2_Click()Staticb……EndSub在Command1_Click过程中无法访问的变量是________。A.bB.yC.xD.a11【单选题】(3分)编写如下程序代码：PrivateSubCommand1_Click()Constn=5Dimarrx(n)AsIntegerFori=1To5arrx(i)=i*iNextiCallswap(arrx(),n)Fori=1TonPrintarrx(i);NextEndSubPublicSubswap(a()AsInteger,kAsInteger)Fori=1Tok/2t=a(i)a(i)=a(k-i+1)a(k-i+1)=tNextEndSub程序运行后，单击命令按钮Command1，输出结果为________。A.14941B.2516941C.1491625D.419251612【单选题】(3分)如果在过程A中用语句：Callproc(a,b)调用下面的过程PrivateSubproc(bAsInteger,ByValaAsInteger)a=a+1b=b*2EndSub则调用结束后的结果是________。A.过程A中变量b的值变为原有值的2倍B.过程A中变量a的值变为原有值的2倍C.过程A中变量a的值变为原有值的2倍，b的值等于原有值加1D.过程A中变量b的值变为原有值的2倍，a的值等于原有值加113【单选题】(3分)在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写以下程序代码：PrivateSubsub1(ByRefd(),ByRefm1AsInteger)DimiAsIntegerm1=d(LBound(d))Fori=LBound(d)+1ToUBound(d)Ifm1<d(i)Thenm1=d(i)NextiEndSubPrivateSubCommand1_Click()Dimn1AsIntegern1=-1Dimdata()data=Array(10,20,-20,50,15,-5)Callsub1(data(),n1)Text1.Text=n1EndSub程序运行过程中，当单击命令按钮Command1时，则在文本框Text1中显示的结果为________。A.50B.-5C.0D.-114【单选题】(3分)有以下程序代码：PrivateSubCommand1_Click()Printfun(10),fun(5)EndSubPrivateFunctionfun(nAsInteger)AsIntegerStatictFork=1Tont=t+kNextkfun=tEndFunction执行Command1_Click过程产生的输出是________。A.5515B.5570C.1570D.155515【单选题】(3分)以下叙述中的是________。A.标准模块文件的扩展名是.bas，工程文件的扩展名是.vbpB.一个工程中可以包含一个或多个窗体，但不能包含其他模块C.保存程序时，应分别保存窗体文件和工程文件D.打开一个工程文件时，系统自动装入与该工程有关的窗体文件16【单选题】(3分)以下叙述中的是________。A.一个VisualBasic应用程序可以包含一个或多个工程B.VisualBasic应用程序只能以解释方式执行C.一个Sub过程内不能嵌套定义另一个Sub过程D.MsgBox函数的返回值与在对话框中所单击的按钮有关，为一整数17【单选题】(3分)要求函数的功能是：从参数str字符串中删除所有参数ch所指定的字符，返回实际删除字符的个数，删除后的字符串仍在str中，为此某人编写了函数DelChar如下：FunctionDelChar(strAsString,chAsString)AsIntegerDimn%,st$,c$st=""n=0Fork=1ToLen(str)c=Mid(str,k,1)Ifc=chThenst=st&cElsen=n+1EndIfNextkstr=stDelChar=nEndFunction并用下面的Command1_Click()过程观察函数调用结果PrivateSubCommand1_Click()ch$=Text1.TextPrintDelChar(ch,"x"),chEndSub发现结果有，程序代码需要修改，以下正确的修改方案是________。A.把语句PrintDelChar(ch,'x'),ch改为PrintDelChar(ch,'x')：PrintchB.把语句Ifc=chThen改为Ifc<>chThenC.把语句DelChar=n改为DelChar=stD.删掉语句str=st18【单选题】(3分)如果窗体模块A中有一个过程：PrivateSubProc()……EndSub则下面叙述中的是________。A.窗体模块A中任何其他过程都可以调用此过程B.在标准模块中不能调用此过程C.在窗体模块B中可以调用此过程D.在窗体模块B中可以有与此相同名称的过程19【单选题】(3分)以下关于VB文件的叙述中，正确的是________。A.标准模块文件的扩展名是.frmB.一个.vbp文件只能含有一个标准模块文件C.一个.vbg文件中可以包括多个.vbp文件D.类模块文件的扩展名为.bas20【单选题】(3分)下面叙述中正确的是________。A.窗体模块中包含本窗体的所有事件过程，标准模块中包含本标准模块的所有事件过程B.一个工程由一个窗体模块和一个标准模块组成C.一个工程中只能有一个标准模块D.一个窗体是一个窗体模块21【单选题】(3分)以下叙述中的是________。A.标准模块文件的扩展名是.bas，工程文件的扩展名是.vbpB.一个工程中可以包含一个或多个窗体，但不能包含其他模块C.打开一个工程文件时，系统自动装入与该工程有关的窗体文件D.保存程序时，应分别保存窗体文件和工程文件22【单选题】(3分)以下叙述中的是________。A.标准模块文件的扩展名是.basB.在标准模块中不能定义过程C.在标准模块中声明的全局变量可以在整个工程中使用D.标准模块文件是纯代码文件23【单选题】(3分)下面有关标准模块的叙述中，的是________。A.标准模块中的全局变量可以被工程中的任何模块引用B.标准模块不完全由代码组成，还可以有窗体C.标准模块的文件扩展名为.basD.标准模块中的Private过程不能被工程中的其他模块调用24【单选题】(3分)下面关于标准模块的叙述中的是________。A.标准模块中可以包含一个SubMain过程，但此过程不能被设置为启动过程B.一个工程中可以含有多个标准模块C.标准模块中可以声明全局变量D.标准模块中可以包含一些Public过程25【单选题】(3分)在标准模块中用Public关键字定义的变量，其作用域为________。A.所有窗体B.本模块所有过程C.所有标准模块D.整个工程26【单选题】(3分)以下叙述中的是________。A.在一个窗体文件中用Private定义的通用过程可以被其他窗体调用B.全局变量可以在标准模块中定义C.一个工程中可以包含多个窗体文件D.窗体和标准模块需要分别保存为不同类型的磁盘文件27【单选题】(4分)下列关于标准模块的叙述中，的是________。A.标准模块可以在某个窗体中建立B.标准模块中的Public过程可以被不同窗体的程序调用C.标准模块文件的扩展名为.bacD.标准模块是一个纯代码文件28【单选题】(4分)以下关于VB文件的叙述中，的是________。A.工程文件的扩展名为.frmB.一个工程可以有多个窗体文件C.标准模块文件不属于任何一个窗体D.一个工程只有一个工程文件29【单选题】(4分)以下关于VB文件的叙述中，正确的是________。A.标准模块文件的扩展名是.frmB.类模块文件的扩展名为.basC.一个工程文件只能含有一个标准模块文件D.VB应用程序可以被编译为.exe文件30【单选题】(4分)如果在窗体模块中所有程序代码的前面有语句：Dimx，则x是________。A.静态变量B.全局变量C.窗体级变量D.局部变量31【单选题】(4分)如果将数组名作为函数调用的实参，则传递给形参的是________。A.数组第一个元素的地址B.数组全部元素的值C.数组第一个元素的值D.数组最后一个元素的值第七章测试1【单选题】(3分)下列不能作为“容器”（即可以在其中放置其他控件）的是________。A.组合框B.图片框C.框架D.窗体2【单选题】(3分)下列叙述中的是________。A.由于直线控件没有Move方法，所以直线控件在运行阶段不能移动B.图片框可以作为控件的容器C.可以使用Print方法在图片框上输出文字D.文本框控件支持Change事件3【单选题】(3分)用于设置计时器事件产生间隔的属性是________。A.TagB.ValueC.IndexD.Interval4【单选题】(3分)设形状控件的Width与Height属性的值相等。下面叙述中正确的是________。A.呈现的图形一定是圆B.呈现的图形一定是正方形C.呈现的图形一定不是矩形D.呈现的图形一定是矩形5【单选题】(3分)设窗体上有2个框架，每个框架中有若干个单选按钮，下面叙述中正确的是________。A.如果某个框架的Enabled属性为True，则里面单选按钮的Enabled属性也都为TrueB.窗体上所有单选按钮中只有1个可以被选中C.如果某个框架的Enabled属性为False，则里面的单选按钮一定都是未选中状态D.每个框架中都有一个单选按钮可以被选中6【单选题】(3分)在计时器控件中，Interval属性的作用是________。A.决定是否响应用户的操作B.设置产生计时器事件的间隔C.决定计时器事件产生的次数D.设置计时器与窗体上边界之间的距离7【单选题】(3分)决定对象拖放模式的属性是________。A.DragDropB.DragIconC.DragModeD.DragOver8【单选题】(3分)下列关于键盘事件的说法中，正确的是________。A.大键盘上"4"键的上档字符是"$"，当同时按下Shift和大键盘上的"4"键时，KeyPress事件过程的B.大键盘上的"1"键和数字键盘上的"1"键的KeyCode码相同C.KeyDown和KeyUp的事件过程中有KeyAscii参数D.按下键盘上的任意一个键，都会引发KeyPress事件9【单选题】(3分)在刚建立的EXE工程中，工具箱窗口中没有的控件是________。A.形状B.通用对话框C.图像框D.驱动器列表框10【单选题】(3分)下面说法中的是________。A.在设计阶段，把已复制到剪贴板上的图像粘贴到图片框或图像框中，可以将该图片装入图片框或图像框B.为使名称为Timer1的计时器控件能每隔2秒触发一次Timer事件，则在程序代码中应写的语句是Timer1.Interval=2000C.可以将计时器控件的Enabled属性设置为False，使其不能触发Timer事件D.为使显示到图像框中的图像能根据图像框的大小自动缩放，则应将图像框的Stretch属性值设置为True11【单选题】(3分)要使图片框P1中显示当前路径下的图片文件img1.jpg，则应使用的语句是________。A.P1.Image="img1.jpg"B.P1.Picture="img1.jpg"C.LoadPicture("img1.jpg")D.P1.Picture=LoadPicture("img1.jpg")12【单选题】(3分)窗体上有1个名称为List1、含有3个项目的列表框，1个名称为Text1的文本框，以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序，希望程序运行时，每隔1秒，List1中的3个项目能够依次在Text1中循环显示。PrivateSubTimer1_Timer()DimiAsIntegerText1.Text=List1.List(i)i=i+1Ifi=List1.ListCountTheni=0EndIfEndSub运行程序，发现有。以下正确的修改是________。A.将语句Text1.Text=List1.List(i)与i=i+1交换位置B.将If语句的条件修改为i<=List1.ListCountC.将语句DimiAsInteger修改为StaticiAsIntegerD.将Interval属性值改为10013【单选题】(3分)在窗体上有一个Picture1图片框，没有加载图片，在当前文件夹下有一个位图文件pic02.bmp，并有下面的程序代码：DimHasPicAsBooleanPrivateSubPicture1_Click()IfHasPicThenPicture1.Picture=LoadPicture("")ElsePicture1.Picture=LoadPicture("pic02.bmp")EndIfHasPic=NotHasPicEndSub关于这个程序运行时，下面叙述中正确的是________。A.第一次单击窗体，会在图片框中显示一个图片，再单击窗体，则删除图片B.第一次单击图片框，会清空图片框，再单击图片框，则在其中显示一个图片C.第一次单击图片框，会在其中显示一个图片，再单击图片框，则删除图片D.第一次单击窗体，会清空图片框，再单击窗体，则在图片框中显示一个图片14【单选题】(3分)以下叙述中的是________。A.如果要在菜单中添加一条分隔线，则应将该菜单项的Caption属性设置为"-"B.在菜单标题中，由"&"所引导的字母指明了该菜单项的访问键C.如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见D.下拉式菜单和弹出式菜单都用菜单编辑器建立15【单选题】(3分)窗体上有Text1、Text2两个文本框，并有以下过程：PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)DimchAsStringch=LCase(Chr(KeyCode))Text2.Text=Chr(Asc(ch)+2)EndSub程序运行时，在Text1中输入了字母"D"，则Text2中显示的是________。A.fB.dC.FD.D16【单选题】(3分)设窗体上有一个标签Label1，并编写了下面的过程PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=1ThenLabel1="X="&X&"Y="&YEndIfEndSub程序运行后的效果是________。A.当按下鼠标右键并移动鼠标时，鼠标的位置坐标会同步显示在标签中B.当移动鼠标时，鼠标的位置坐标会同步显示在标签中C.当按下鼠标左键并移动鼠标时，鼠标的位置坐标会同步显示在标签中D.当按下鼠标左键时，鼠标的位置坐标会同步显示在标签中17【单选题】(3分)程序运行时，当用鼠标点击滚动条两端的箭头按钮时，不会产生的结果是________。A.激活Change事件B.改变Value属性的值C.激活Scroll事件D.滚动框移动18【单选题】(3分)当复选框的Value属性值为1时，表示________。A.该复选框不可见B.选中该复选框C.该复选框不可用D.没有选中该复选框19【单选题】(3分)以下关于图片框控件的说法中，正确的是________。A.清空图片框控件中图形的方法之一是将其Picture属性的值设置为NullB.可以通过调用图片框的Print方法在图片框中输出文本C.为使图像能自动适应图片框的大小，应将图片框的Stretch属性设置为FalseD.用cls方法可以清除图片框中装入的图片20【单选题】(3分)当复选框控件被选中（即复选框控件内显示"√"标记）时，其Value属性的值为________。A.0B.TrueC.FalseD.121【单选题】(3分)设有一名称为mnuBold的下拉菜单项，程序运行时，希望达到如下效果：当第一次单击该菜单项时，其标题左侧显示"√"，当第二次单击该菜单项时，其标题左侧的"√"消失，依此交替进行，......。则应在mnuBold_Click事件过程中书写的语句是________。A.mnuBold.Checked=IIf(mnuBold.Checked,True,False)B.mnuBold.Checked=NotmnuBold.CheckedC.mnuBold.Checked=TrueD.mnuBold.Checked=False22【单选题】(3分)下列与鼠标拖放操作无关的是________。A.Drag方法B.KeyPress事件C.DragOver事件D.DragDrop事件23【单选题】(3分)在窗体上画一个名称为Text1的文本框，然后编写以下事件过程：PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)If_________________ThenText1.SelStart=0Text1.SelLength=Len(Text1.Text)EndIfEndSub要求程序运行时，若输入焦点在Text1上，按下组合键Ctrl+A可以选取Text1内所有的文本，则在横线处应填入的表达式是________。A.Text1.KeyCode=65AndText1.Shift=2B.KeyCode="A"AndShift="Ctrl"C.KeyCode=65AndShift=2D.Text1.KeyCode="A"AndText1.Shift="Ctrl"24【单选题】(3分)程序运行时若单击水平滚动条上滚动块右边的空白处，则其Value属性值的变化量为________。A.SmallChange属性的值B.LargeChange属性的值C.Max属性的值D.Min属性的值25【单选题】(3分)下列叙述中，正确的是________。A.文本框可以显示多行文本B.标签中显示的文本在运行阶段不能改变C.组合框是组合文本框和列表框的特性而成的控件，所以它具有二者的全部属性D.框架控件的标题不能在程序运行过程中修改26【单选题】(3分)对于通用对话框控件，下列说法中的是________。A.用通用对话框控件可以建立打开文件对话框，也可以建立保存文件对话框B.用打开文件对话框可以指定一个文件，由程序使用C.DefaultEXT和DialogTitle属性只用于打开对话框，不能用于保存对话框D.用保存文件对话框可以指定一个文件，由程序使用27【单选题】(3分)为了在程序运行时弹出一个菜单，程序中应使用________。A.窗体的PopupMenu方法B.所单击控件的PopupMenu方法C.窗体的Show方法D.窗体的ShowMenu方法28【单选题】(3分)下列叙述中的是__________。A.可以使用Print方法在图片框上输出文字B.文本框控件支持Change事件C.由于直线控件没有Move方法，所以直线控件在运行阶段不能移动D.图片框可以作为控件的容器29【单选题】(4分)用于设置计时器事件产生间隔的属性是__________。A.TagB.IndexC.ValueD.Interval30【单选题】(4分)设窗体上有2个框架，每个框架中有若干个单选按钮，下面叙述中正确的是__________。A.窗体上所有单选按钮中只有一个可以被选中B.如果某个框架的Enabled属性为False，则里面的单选按钮一定都是未选中状态C.如果某个框架的Enabled属性为True，则里面单选按钮的Enabled属性也都为TrueD.每个框架中都有一个单选按钮可以被选中31【单选题】(4分)在计时器控件中，Interval属性的作用是__________。A.决定计时器事件产生的次数B.设置产生计时器事件的间隔C.设置计时器与窗体上边界之间的距离D.决定是否响应用户的操作32【单选题】(4分)下列关于键盘事件的说法中，正确的是__________。A.主键盘上的"1"键和数字键盘上的"1"键的KeyCode码相同B.KeyDown和KeyUp的事件过程中有KeyAscii参数C.按下键盘上的任意一个键，都会引发KeyPress事件D.主键盘上"4"键的上档字符是"$"，当同时按下Shift和主键盘上的"4"键时，KeyPress事件过程的KeyAscii参数值是"$"的ASCII值第八章测试1【单选题】(5分)1.窗体的隐藏和删除分别用在不同的场合，隐藏Form1和删除Form1的命令是__________。A.A.Hide.Form1Unload.Form1B.Hide.Form1Form1.UnloadC.Form1.HideForm1.UnloadD.Form1.HideUnload.Form12【单选题】(5分)与Forml．Show方法效果相同的是__________。A.Visible.Form1=FalseB.Form1.Visible=TrueC.Form1.Visible=FalseD.Visible.Form1=True3【单选题】(5分)要从自定义对话框Form2中退出可以在该对话框的“退出”按钮Click事件过程中使用__________语句。A.Form2.UnloadB.HideForm2C.UnloadForm2D.Form2.Hide4【单选题】(5分)如果Form1是启动窗体，并且Form1的Load事件过程中有语句Form2.Show,则程序启动后__________。A.在所有的初始化代码运行后Form2是活动窗体B.发生一个编译C.发生一个运行时D.在所有的初始化代码运行后Form1是活动窗体5【单选题】(5分)下面关于多重窗体的叙述中，正确的是__________。A.若启动对象是Main子过程，则程序启动时不加任何窗体，以后该过程根据不同情况决定是否加载或加载块B.作为启动对象的Main子过程只能放在窗体模块中C.没有启动窗体，程序不能执行D.没有Main子过程，程序不能执行6【单选题】(5分)对于含有多个窗体的工程而言，以下叙述中正确的是________。A.没有指定启动窗体时，系统自动将最后一个添加的窗体设置为启动窗体B.Load方法兼有装入和显示窗体两种功能C.Hide方法可以将指定的窗体从内存中清除D.启动窗体可以通过"工程属性"对话框指定7【单选题】(5分)以下关于窗体的叙述中的是________。A.窗体的Load事件在加载窗体时发生B.若工程中包含多个窗体，则可指定一个为启动窗体C.窗体的Hide方法将窗体隐藏并卸载D.窗体的Show方法可以将窗体装入内存并显示该窗体8【单选题】(5分)如果要将一个窗体从内存中清除，应使用的语句是________。A.HideB.UnloadC.LoadD.Show9【单选题】(5分)为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容，首先应执行的操作是________。A.设置窗体的Enabled属性B.设置窗体的Visible属性C.设置窗体的AutoRedraw属性D.调用窗体的Show方法10【单选题】(5分)设一个工程文件包含多个窗体及标准模块，以下叙述中的是________。A.Show方法用于显示一个窗体B.用Hide方法只是隐藏窗体，不能从内存中清除该窗体C.如果工程中有SubMain过程，则程序一定首先执行该过程D.不能把标准模块设置为启动模块11【单选题】(5分)以下叙述中的是________。A.在一个窗体文件中用Private定义的通用过程可以被其他窗体调用B.一个工程中可以包含多个窗体文件C.窗体和标准模块需要分别保存为不同类型的磁盘文件D.全局变量可以在标准模块中定义12【单选题】(5分)工程中有Form1、Form2两个窗体（Form1中有文本框Text1；Form2中有Text1文本框和Command1命令按钮）。Form1是启动窗体。在这些模块中编写下面的程序代码：Form1中的代码如下：PrivateSubText1_DblClick()Text1="VisualBasic"Form2.ShowEndSubForm2中的代码如下：PrivateSubCommand1_Click()Text1=Form1.Text1Form1.ShowEndSub下面关于程序的叙述中的是________。A.双击Form1的Text1后,Text1中显示"VisualBasic"，弹出Form2B.双击Form1的Text1后，Form2成为当前窗体C.单击Form2的命令按钮，Form1成为当前窗体D.Form2的Text1=Form1.Text1语句不能正确执行13【单选题】(5分)以下叙述中的是________。A.当工程中含有SubMain过程时，工程执行时一定最先执行该过程B.SubMain是定义在标准模块中的特定过程C.SubMain过程不能有返回值D.一个工程中只能有一个SubMain过程14【单选题】(5分)VisualBasic中的"启动对象"是指启动VisualBasic应用程序时，被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中，的是________。A."启动对象"可以是指定的标准模块B."启动对象"可以是指定的窗体C."启动对象"可以是SubMain过程D.若没有经过设置，则默认的"启动对象"是第一个被创建的窗体15【单选题】(5分)对于含有多个窗体的工程而言，以下叙述中正确的是________。A.没有指定启动窗体时，系统自动将最后一个添加的窗体设置为启动窗体B.Load方法兼有装入和显示窗体两种功能C.Hide方法可以将指定的窗体从内存中清除D.启动窗体可以通过"工程属性"对话框指定16【单选题】(5分)以下关于多重窗体程序的叙述中，的是________。A.对于多重窗体程序，需要单独保存每个窗体B.用Hide方法不仅可以隐藏窗体，而且还可以清除内存中的窗体C.在多重窗体程序中，各窗体的菜单是彼此独立的D.在多重窗体程序中，可以根据需要指定启动窗体17【单选题】(5分)以下关于VB特点的叙述中，的是________。A.VB程序能够以解释方式运行B.VB程序能够以编译方式运行C.VB程序总是从Form_Load事件过程开始执行D.VB采用事件驱动的编程机制18【单选题】(5分)以下关于窗体的叙述中的是________。A.窗体的Hide方法将窗体隐藏并卸载B.若工程中包含多个窗体，则可指定一个为启动窗体C.窗体的Show方法可以将窗体装入内存并显示该窗体D.窗体的Load事件在加载窗体时发生19【单选题】(5分)下列操作中不能向工程添加窗体的是________。A.执行"工程"菜单中的"添加窗体"命令B.右击窗体，在弹出的菜单中选择"添加窗体"命令C.单击工具栏上的"添加窗体"按钮D.右击工程资源管理器，在弹出的菜单中选择"添加"命令，然后在下一级菜单中选择"添加窗体"命令20【单选题】(5分)下列说法中的是________。A.在过程中，可以用Static定义变量，但当该过程调用结束后，其值继续保留B.SubMain过程一定是程序运行时首先被执行的过程，是整个程序的入口点C.同一个工程中只能有一个SubMain过程D.当用Static关键字定义一个过程时，该过程中的所有变量都是"Static"存储方式的第九章测试1【单选题】(3分)设有如下程序代码：PrivateSubCommand1_Click()DimSnameAsString,SNoAsString,ScoreAsSingleOpen"D:Score.txt"__________As#1SNo=InputBox("输入学号：")Sname=InputBox("输入姓名：")Score=Val(InputBox("输入成绩："))Print#1,SNo,Sname,ScoreClose#1EndSub以上程序的功能是，向文件D:Score.txt中写入一名同学的学号、姓名和成绩，当文件不存在时，则新建该文件；当文件存在时，则覆盖原文件的内容。在横线处应填入的内容是________。A.ForOverWriteB.ForInputC.ForOutputD.ForRandom2【单选题】(3分)VisualBasic的窗体文件（.frm文件）是一个文本文件，它________。A.既可当作顺序文件读取也可当作随机文件读取B.可以当作随机文件读取C.不能作为VisualBasic的数据文件来访问D.可以当作顺序文件读取3【单选题】(3分)在一个有若干个整数的顺序文件中查找一个数（这个数从文本框中输入），找到后在标签Label1中显示该数是文件中第几个数；如果没找到，则显示文件中没有该数的信息PrivateSubCommand1_Click()DimxAsInteger,nAsIntegera=Val(Text1.Text)Open"file1.txt"ForInputAs#1DoWhileNotEOF(1)Input__________________n=n+1Ifx=aThenLabel1.Caption=a&"是文件中第"&n&"个数"Close#1ExitSubEndIfLoopClose#1Label1.Caption="文件中没有"&aEndSub要使上面的程序代码实现上述功能，在横线处应填写的是________。A.#1,xB.1,aC.#1,aD.1,n4【单选题】(3分)下列关于随机文件的描述中，的是________。A.每条记录的长度必须相同B.每条记录都有一个记录号C.只能随机存取D.数据存取灵活方便，容易修改5【单选题】(3分)在窗体Form1上画一个名称为Command1的命令按钮，编写如下程序代码：PrivateTypestusnAsString*20classAsString*20EndTypePrivateSubCommand1_Click()DimsAsstuOpen"c:allstu.dat"ForRandomAs#1Len=Len(s)s.sn="John"s.class="Computer2013"Put#1,,sClose#1EndSub则以下叙述中正确的是________。A.如果文件c:allstu.dat不存在，则Open语句执行中出现'文件未找到'的B.定义记录类型stu的Type语句可以移到事件过程Command1_Click中C.语句'Put#1,,s'中没有指明记录号，因此系统总是把记录写到文件的头部D.文件c:allstu.d