《vb期中测试》试卷题号得分一33二10.5三15.5总分59系（部）一、单选题（每题1.5分，共45分）线1、在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序：PrivateSubCommand1_Click()Dima(10)AsIntegerDimxAsIntegerFori=1To10a(i)=8+iNextx=2Printa(f(x)+x)专业****************C、***************D、***************您的答案：D参考答案：D您的得分：1.5题分：1.53、有如下程序：：PrivateSubForm_Click()DimiAsInteger,sumAsIntegersum=0Fori=2To10IfiMod2<>0AndiMod3=0Thensum=sum+iEndIf封班级EndSubFunctionf(xAsInteger)x=x+3f=xEndFunction程序运行后，单击命令按钮，输出结果为______。姓名苏运宏A、18B、15您的答案：D参考答案：A您的得分：0题分：1.52、下列程序段的执行结果为______。Forx=5To1Step-1C、17D、12NextiPrintsumEndSub程序运行后，单击窗体，输出结果为______。学号1033010121密ForY=1To6-xPrintTab(Y+5);"*";NextYPrintNextxA、30B、12C、24您的答案：B参考答案：B您的得分：1.5题分：1.54、以下关于图片框控件的说法中，错误的是______。D、18A、***************B、*********A、清空图片框控件中图形的方法之一是加载一个空图形B、可以通过Print方法在图片框中输出文本C、图片框控件可以作为容器使用D、用Stretch属性可以自动调整图片框中图形的大小您的答案：D参考答案：D您的得分：1.5题分：1.55、在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：PrivateXAsIntegerPrivateSubCommand1＿Click()X=5:Y=3Callproc(X,Y)Label1.Caption=XLabel2.Caption=YEndSubText1.Text=""CallP1(x,y,z)Text1.Text=Str(z)EndSubSubP1(ByValaAsInteger,ByValbAsInteger,cAsInteger)PrivateSubproc(ByValaASInteger,ByValbAsInteger)X=a*aY=b+bEndSub程序运行后，单击命令按钮，则两个标签中显示的内容分别是______。c=a+bEndSub程序运行后，如果单击命令按钮，则在文本框中显示的内容是______。密A、5和6B、25和3您的答案：D参考答案：B您的得分：0题分：1.56、以下叙述中正确的是______。C、25和6D、5和3A、12B、0您的答案：A参考答案：A您的得分：1.5题分：1.510、下列程序段的执行结果为______。X=2.4:Z=3:K=5Print"A(";X+Z*K;")"C、Str(z)D、没有显示A、对象的Name属性值可以为空B、窗体的Name属性的值是显示在窗体标题栏中的文本C、可以在运行期间改变对象的Name属性的值D、窗体的Name属性指定窗体的名称，用来标识一个窗体您的答案：D参考答案：D您的得分：1.5题分：1.57、以下叙述中错误的是______。A、全局变量必须在标准模块中定义B、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件C、一个工程中可以包含多个窗体文件D、在一个窗体文件中用Private定义的通用过程能被其他窗体调用您的答案：B参考答案：D您的得分：0题分：1.58、现有语句：y=IIf(x>0,xMod3,0)设x=10，则y的值是______。A、A(2.4+3*5)B、A(17.4)C、A(18)D、A(17)您的答案：D参考答案：B您的得分：0题分：1.511、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。A、Text1.Visible=FalseB、Text1.Enabled=FalseC、Text1