搜索
一、选择题1.VB是一种面向对象的可视化程序设计语言，采取了_________的编程机制。A)事件驱动B)按照过程顺序执行C)从主程序开始执行D)按模块顺序执行2.假如一个VisualBasic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是__________。A）只保存窗体模块文件。B）分别保存窗题模块、标准模块和工程文件。C）只保存窗体模块和标准模块文件。D）只保存工程文件。3.以下不属于VB工作模式的是_______________模式。A）设计B）编译C）运行D）中断4.文本框没有________________属性。A）EnabeldB）CaptionC）VisibleD）BackColor5.Dimb1,b2asInteger语句显式声明变量__________________。A）b1和b2都为整型B）b1是整型，b2是变体型C）b1是变体型，b2是整型D）b1和b2都为是变体型6.语句IfX=1ThenY=1，下列说法是正确的________________。A）X=1和y=1都是赋值语句B）X=1是关系表达式，y=1是赋值语句C）X=1是赋值语句，y=1是关系表达式D）X=1和y=1都是关系表达式7.For–Next循环结构中，若循环控制变量的步长为0，则_______________。A）形成无限循环B）循环体执行一次后结束循环C）语法错误D）循环不执行即结束循环8.下列中不是属性的是：A.captionB.textC.ClickD.picture9.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是()A.工程资源管理器窗口B．工具箱窗口C．代码窗口D．属性窗口10.以下叙述中正确的是()A.窗体的Name属性指定窗体的名称，用来标识一个窗体B．窗体的Name属性的值是显示在窗体标题栏中的文本C．可以在运行期间改变对象的Name属性的值D．对象的Name属性值可以为空11.设有如下声明：DimXAsInteger如果Sgn(X)的值为-1，则X的值是()A.整数B．大于0的整数C．等于0的整数D．小于0的数12.设a=3，b=5，则以下表达式值为真的是()A．a=bAndb10B．(ab)Or(b0)C．a=0D．(-3+5a)And(b0)13.从键盘上输入两个字符串，分别保存在变量strl、str2中。确定第二个字符串在第一个字符串中起始位置的函数是()A．LeftB．MidC.StringD．Instr14.设a=VisualBasic，下面使b=Basic的语句是()A．b=Left(a，8，12)B．b=Mid(a，8，5)C.b=Right(a，5，5)D．b=Left(a，8，5)15.在VB中把一组具有同一名字、不同下标的下标变量称为___________。A）同类数据B）数组C）变量数组D）变量16.若用Dima(10)AsInteger语句声明了数组a，以下语句中错误的是______。A）a(9)=a(-6)B）a(1)=56C）a(8)=a(1)+a(3)D）a(1)=a(8)-3417.对于动态数组a，如果需要重新定义大小，并保留原有数据，可使用语句_________。A）DimB）ReDimC）DimPreserveD）ReDimPreserve18.在自定义的函数过程体内，至少对函数名赋_____________值。A）一次B）两次C）三次D）四次19.设有以下循环结构Do循环体LoopWhile条件则以下叙述中错误的是_____________。A）若条件是一个为0的常数，则一次也不执行循环体B）条件可以是关系表达式、逻辑表达式或常数C）循环体中可以使用ExitDo语句D）如果条件总是为True，则不停地执行循环体20.要想从子过程调用后返回两个结果，下面子过程语句合法的是______________。21.在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。程序为：PrivateSubTimerl____()TxtTime.text=TimeEndSub在下划线上应填人的内容是()A．EnabledB．VisibleC.IntervalD．Timer22.在窗体上画两个单选按钮，名称分别为Optionl、Option2，标题分别为宋体和黑体；一个复选框，名称为Checkl，标题为粗体；一个文本框，名称为Textl，Text属性为改变文字字体。要求程序运行时，当“宋体”单选按钮和“粗体”复选框被选中，能够实现上述要求的语句序列是()A．Optionl.Value=TrueB．Optionl.Value=TrueCheckl.Value=FalseCheckl.Value=TrueC.Option2.Value=FalseD．Optionl.Value=TrueCheckl.Value=TrueCheckl.Value=123.要想在过程调用后返回两个结果，下面的过程定义语句合法的是()A．SubProcl(ByValn，ByValm)B．SubProcl(n，ByValm)C.SubProcl(n，m)D．SubProcl(ByValn，m)24.在参数传递过程中，使用关键字()来修饰参数，可以使之按值传递。A．ByValB．ByRefC.ValueD．Reference25.关于语句Ifx=1Theny=1，下列说法正确的是()A.x=1和y=1均为赋值语句B．x=1和y=1均为关系表达式C.x=1为关系式表达式，y=1为赋值语句D．x=1为赋值语句，y=1为关系表达式26.列表框中的列表项的数目可通过以下哪个属性的值获得()A．CountB．ListcountC．ListlndexD．Index27.要清除列表框中所有的列表项时，应使用以下哪种方法()A．RemoveB．ClearC．RemoveitemD．Cls28.产生[10，37]之间的随机整数的VisualBasic表达式是()A．Int(Rnd(1)*27)+10B．Int(Rnd(1)*28)+10C．Int(Rnd(1)*27)+11D．Int(Rnd(1)*28)+1129.下列叙述中不正确的是()A.变量名的第一个字符必须是字母B．变量名的长度不超过255个字符C．变量名可以包含小数点或者内嵌的类型声明字符D．变量名不能使用关键字30.在一个语句行内写多条语句时，语句之间应该用()分隔。A．逗号D．分号C．顿号D．冒号二、填空题1.对象的三要素为_______、____________、____________。2.要将用户在文本框Text1中所选择的文本赋值给变量a，应书写语句________。3.要设置窗体的背景图，应使用图形加载函数___________。4.当对命令按钮picture属性装入.bmp图形文件后，命令按钮上并没有显示所需的图形，原因是没有将__________属性设置为1（Graphical）5.VB是一种面向对象的可视化程序设计语言，采取了_________的编程机制。6.滚动条的值的范围是由________属性和________属性决定的。7.在VB中最基本的对象是________，它是应用程序的基石，是其他控件的容器。8.算术式（1+xy）6的VB表达式是________。9.产生“C”～“L”范围内的一个大写字符的VB表达式是________。10.表示x是5或7的倍数的VB表达式是________。11.已知A$=”87654321”,求表达式Val（Left（A$,4））+Mid(A$,4,2)的值是_______.12.INT(1234.567*100+0.5)/100的值是__________。13.产生变量X的值在[10，100]中的表达式为__________。14.如果要使命令按钮Command1上显示文字“退出（X），并以Alt+X为快捷键，则其Caption属性应设置为：__________。15.VB系统执行Form_Load()事件过程时，如果用Print在窗体上输出显示信息，必须将_____________属性设置为__________。16.如果要在命令按钮上显示图形，应将命令按钮的________属性设置为1-Graphical。17.下列语句执行后，变量Y1的值是__________，Y2的值是__________，Y3的值是__________。OptionExplicitDimX!,Y1,Y2,Y3,Y4PrivateSubForm_Click()X=-3.4167Y1=Fix(X):Y2=Int(X):Y3=Round(X):Y4=Round(X,1)PrintY1,Y2,Y3,Y4EndSubX=-3.4567Y1=FIX（X）：Y2=INT（X）：Y3=ROUND（X，2）18.窗体上有1个名称为Textl的文本框；1个名称为Thnerl的计时器控件，其Lnterval属性值为5000，Enabled属性值是True。Timerl的事件过程如下：PrivateSubTimerl_Timer()StaticflagAsIntegerIfflag=0Thenflag=1flag=-flagIfflag=1ThenText1.ForeColor=&HFF&'&HFF&为红色ElseText1.ForeColor=&HC000$'&HC000&为绿色EndIfEndSub以下叙述中正确的是（）。A）每次执行此事件过程时，flag的初始值均为0B）flag的值只可能取0或1C）程序执行后，文本框中的文字每5秒改变一次颜色D）程序有逻辑错误，Else分支总也不能被执行19.为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Textl中，若编写如下事件过程：PrivateSubCommandlClick()Dima%，S%，k%5s=1a=2Fork=2To10a=a*2s=s+aNextkTextl.Text=sEndSub执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是（）。A）把s=1改为s=0B）把Fork=2To10改为Fork=ITo10C）交换语句s=s+a和a=a*2的顺序D）同时进行B）、C）两种修改20.下面用SelectCase结构改写上述程序，使两段程序所实现的功能完全相同。请填空。SelectCasesCase【1】=90Level=ACase75To89Level=BCase60To74Level=CCase【2】Level=D【3】21.窗体上有名称为Command1的命令按钮。事件过程及2个函数过程如下：PrivateSubCommand1C1ick()DimxAsInteger,yAsInteger,zx=3y=5z=fy(y)Printfx(fx(x)),yEndSubFunctionfx(ByValaAsInteger)a=a+afx=aEndFunctionFunctionfy(ByRefaAsInteger)a=a+afy=aEndFunction9运行程序，并单击命令按钮，则窗体上显示的2个值依次是【4】和【5】。22.在窗体上画一个名为Command1的命令按钮，然后编写如下程序：PrivateSubCommand1_Click()DimiAsIntegerSum=0n=InputBox(Enteranumber)n=Val(n)Fori=1TonSum=【6】NextiPrintSumEndSubFunctionfun(tAsInteger)AsLongp=1Fori=1Totp=p*iNexti【7】EndFunction以上程序的功能是，计算1!+2!+3!+…+n!，其中n从键盘输入，请填空。23.在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click(