第二部分VisualBasic程序设计一、选择题21．设S是字符型变量，以下语句正确的是＿＿＿。A．s=List1.CaptionB．s=Timer1.CaptionC．s=Text1.CaptionD．s=Label1.Caption22．扩展名为VBP的工程文件中包含有＿＿＿＿。A．工程中所有模块的有关信息B．每个窗体模块中的所有控件的有关信息C．每个模块中所有变量的有关信息D．每个模块中所有过程的有关信息23．在窗体的通用说明部分有以下说明语句，其中正确的是＿＿＿。A．PrivateConstAAsInteger=235/2B．ConstBAsInteger=cint(2.53)C．dimconstCasinteger=3579D．publicconstsasBoolean=true24．以下控件对象中具有Picture属性的是＿＿＿＿。①PictureBox②Frame③OptionButton④CommandButton⑤ListBox⑥CheckBox⑦LabelA．①③④⑥B．①②⑤⑥⑦C．①③④⑤⑥D．①②③④⑤⑥25．在过程中已说明a、b、c均为Integer型变量，且均已被赋值，其中a=30、b=40、c=50，如再执行下面的语句，可正常执行的是＿＿＿。A．Printa*b*cB．Printa*b*c*1&C．Print1&*a*b*cD．Printa*b*c*1!26．表达式XModY\Z>5andA+B+C>=36中最先被执行的运算是＿＿＿＿。A．＋B．ANDC．MODD．\27．下列有关事件过程的说法错误的是＿＿＿＿。A.标准模块中不能包含事件过程B.事件过程都是无参（没有形式参数）的过程C.事件过程也可以通过Call语句调用执行D.事件过程中不能声明全局变量28．以下有关Redim语句用法的说明错误的是＿＿＿＿。A．Redim可用于定义一个新数组B．Redim语句既可以在过程中使用，也可以在模块的通用声明处使用C．无Preserve关键字的Redim语句，可重新定义动态数组的维数D．在Redim语句中，可使用变量说明动态数组的大小29．下列有关文件的说法正确的是＿＿＿＿。A．打开随机文件时，参数Len的值可任意设置B．若以Output、Append、Random或Binary方式打开一个不存在的文件，系统会出错C．在Input方式下，不能使用不同文件号同时打开同一个文件D．在一个过程中，一个文件号有可能被用于打开不同的文件30．下面语句中，可以在窗体上绘制正方形的语句是＿＿＿。①Shape1.Shape=1②Line(500,1500)-(1200,2000)③Shape1.Shape=0④Line(500,1500)-(1000,2000)A．②③B．①④C．①②D．③④二、填空题1．执行下面程序，单击按钮Command1，窗体上第一行显示的内容是＿＿＿，第二行显示的内容是＿＿＿＿。PrivateSubCommand1_Click()DimxAsInteger,yAsInteger,zAsIntegerx=6:y=12:z=20Printfun1(x,y)Printfun1(fun1(x,y),z)EndSubPrivateFunctionfun1(aAsInteger,bAsInteger)AsLongDimyAsIntegery=aDoIfyModb=0Thenfun1=yExitFunctionElsey=y+aEndIfLoopEndFunction2．执行下面程序，单击按钮Command1，窗体上第一行显示的内容是＿＿＿，第二行显示的内容是＿＿＿。OptionExplicitDimaAsSinglePrivateSubCommand1_Click()DimaAsSingle,bAsIntegera=1.2:b=3Printfun1(a,b)PrintaEndSubPrivateFunctionfun1(xAsSingle,yAsInteger)AsIntegerDimiAsIntegerFori=1Toyx=x*2a=a+1Nextifun1=aEndFunction3．执行下面程序，单击按钮Command1，在图片框Pic2中第一行显示的内容是＿＿＿＿，第二行显示的内容是＿＿＿＿，第三行显示的内容是＿＿＿。OptionexplicitOptio