高级语言程序设计(VB)(模拟试题及答案)

VB一、判断题(如正确打，否则，打×)1．控制台应用程序至少有一个Main过程。2.学校$是正确的变量名。3.把a,b之中的最大值存放于max，使用的语句为:Ifa>bThenmax=aElsemax=bEndIf4．判别ch是否为小写字母，若是，输出“yes”；否则，输出“No”的块结构条件语句为IfAsc(ch)>=97AndAsc(ch)<=122ThenWriteLine(“Yes”)ElseWriteLine(“No”)EndIf5.输入结构变量的值就是输入该变量的各个元素的值。6.若某个模块中以关键字public定义子过程，则只能在该模块中可以调用该过程。7.事件是由VB.Net系统预先设置好或者在程序中由编程者自己设计的，它能够被对象识别的动作。8.在程序中能像调用普通函数那样显式调用构造函数。9．在程序运行期间，用户可以用文本框显示信息。10.从文件取出一组数据以流的方式存放到程序中的变量或数组中称为向流写入数据。二、单项选择题1．VB.NET是一种()程序设计语言。A.面向事件B.面向属性C.面向对象D.面向过程D.计算2.执行目标程序时出现的错误称为(A.语法或编译B.运行)错误。C.逻辑3.单精度浮点型数据占用(A.1B.2)个存储字节。C.4D.84．下列选项中，把r定义为双精度型变量的是（）。D.r$A.r%B.r!C.r#5．100%表示100为（A.整）型数据。B.单精度浮点C.货币D.字符6．设X为整型变量,不能正确表达1<X<5的逻辑表达式是()。A.1<X<5B.X=2orX=3orX=4C.1<XAndX<5D.Not(X<=1)AndNot(X>=5)7.下列程序段的执行后显示的结果是()。X=10:Y=3WriteLine("{0}"，(x*y)/5)A.10B.3C.5D.68．执行下面语句后，输出结果为()。A=10:B=30:C=20WriteLine("{0}{1}{2}"，A，B，C)A.0、1和2B.、20和30C.、10和30D.10、30和209．执行下面语句后，输出结果为()。A=10:B=30IfA<BThenWriteLine("{0}{1}"，A，B)A.10B.30C.10和30D.30和1010．下列程序段执行后窗体上显示（i=0）。Whilei<=2i=i+1EndWhileWrite(i)A.0B.1C.2D.311.运行如下程序段后，x的值是（）。x=2Fori=1to8step2x=x+inextiA.2B.18C.27D.3812．在Sub过程体内可以用()语句强制退出Sub过程的执行。A.ExitDoB.ExitForC.ExitFunctionD.ExitSub13．下列一维数组说明语句正确的是（）。A.Dimb(2)ASInteger={1,2,3}B.Dimb(0To2)ASInteger={1,2,3}C.Dimb()ASInteger={1,2,3}D.Dimb(2)ASString={"one","two","Three"}14．设有数组说明语句：Dimc(10)AS，则下面表示数组c的元素选项中（）是错误的。A.c(i-1)B.c(5+0.5)C.c(0)D.c(11)15．设有数组说明语句：Dima（3，3），则数组a中包含元素的个数是（A.3B.6C.9D.16）。16．以关键字Function定义的过程是（）。A.子过程B.函数过程D.事件过程C.属性过程17．在过程的形式参数前面加上关键字（），则该参数说明为传值参数。D.ByValA.ValB.refC.Byref18．设已定义Sub过程p，有3个数值型传值参数；设a为实型变量，调用该Sub过程的错误语句为（）。A.p(c,b,a)B.callp0.5,a,100C.callp(0.5,cos(0.1),a+10)D.p(0.5,1.2,100)19．在类定义的外部，可以被访问的成员有()。A.所有类成员B.private或protected的类成员D.public或private的类成员C.public的类成员20．当鼠标在窗体上移动时，会发生（A.MouseDownB.MouseUp）事件。C.MouseMoveD.KeyDown三、简答题1.程序设计语言的语句按功能可以分成哪几类语句?它们的作用是什么？2．若有数组定义语句：Dimc%()={76,80,}则数组c有多少个元素？这些元素是什么？它们的初值是多少？3.什么是文件？文件操作可以分为哪些步骤?四、程序阅读题1．写出执行下列程序的输出结果。ImportsSystem.ConsoleModuleModule1SubMain()Dimi%,y!y=1:i=1DoWhilei<6y=y*i-1i=i+2WriteLine("y={0}",y)LoopEndSubEndModule2.写出执行下列程序的输出结果。ImportsSystem.ConsoleModuleModule1SubMain()Dimf(5)AsInteger,iAsIntegerf(0)=0:f(1)=1Fori=2To5f(i)=2*f(i-2)+4*f(i-1)NextiFori=0To5IfiMod2=0ThenWriteLine()Write("{0}",f(i))NextiWriteLine()EndSubEndModule3．写出执行下列程序的输出结果。ImportsSystem.ConsoleModuleModule1SubMain()Dimm%,n%,p%,s#s=f(5)WriteLine("s={0}",s)EndSubPrivateFunctionf(ByValx%)AsLongDimiAsInteger,tAsLongt=1Fori=1Toxt=t*iNextiReturntEndFunctionEndModule五、程序填空题1.下面程序代码的功能是：求的值，在横线上填上适当内容。ImportsSystem.ConsoleModuleModule1SubMain()Dimi,n%,s!Write("n=")n=ReadLine()i=1:s=(1)Whiles=s+i=i+1EndWhileWriteLine("s={0}",EndSubEndModule(2)(3)(4))2．下面程序代码的功能是：从键盘上输入x，y和z的值，按如下公式求f(x，y，z)的值的程序，在横线上填上适当内容。f(x,y,z)=sin(x)/(sin(x-y)*sin(x-z))+sin(y)/(sin(y-z)*sin(y-x))+sin(z)/(sin(z-x)*sin(z-y))其中x、y和z互不相等。ImportsSystem.ConsoleImportsSystem.ModuleModule1SubMain()(5)Dimx!,y!,z!,s!Write("x="):x=ReadLine()Write("y="):Write("z="):z=ReadLine()Ifx<>yAndy<>zAnd(7)(6)=ReadLine()Thens=f(x,x-y,x-z)+f(y,y-z,y-x)+f(z,z-x,z-y)WriteLine("s={0}",s)ElseWriteLine("数据输入错误!")EndIfEndSubPrivateFunctionf(ByValaAsSingle,ByValbAsSingle,ByValcAsSingle)AsSingle(8)EndFunctionEndModule=Sin(a)/(Sin(b)*Sin(c))参考答案一.、判断题(如正确打，否则，打×)1.√2.√3.×4.√5．√6.×7.√8.×9.√10.×二、单项选择题B12D11B13C14D15D16B17D18B三、简答题1.程序设计语言的语句按功能可以分成哪几类语句它们的作用是什么？答:按功能可以分成3:声明语句、操作语句和控制语句。声明语句不是执行语句，它用于命名变量、常数或过程，或定义数据类型。操作语句用于描述对数据的处理。控制语句用于控制程序的执行流程。2．若有数组定义语句：Dimc%()={76,80,75}，则数组c有多少个元素？这些元素是什么？它们的初值是多少？答:数组c共有3个元素c(0)c(1)和c(2)76,80和75c(0)=76c(