VB历年试题08年9月

《VB历年试题08年9月》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、（11）在设计窗体时双击窗体的任何地方，可以打开的窗口是（）。A）代码窗口B）属性窗口C）工程资源管理器窗口D）工具箱窗口（12）若变量a未事先定义而直接使用（例如：a=0），则变量a的类型是（）。二级VisualBasic语言程序设计试卷第3页（共10页）运行程序时，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是（）。A）5B）6C）10D）11（22）在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Labcl1，然后编写如下事件过程：PrivateSubCommand1_Click()Counter=0Fori

2、=1To4Forj=6To1Step-2Counter=Counter+1NextjNextiLabel1.Caption=Str(Counter)EndSub程序运行后，单击命令按钮，标签中显示的内容是（）。A）11B）12C）16D）20（23）在窗体上画一个名为Command1的命令按钮，然后编写以下程序：PrivateSubCommand1_Click()DimM(10)AsIntegerFork=1To10M(k)=12-kNextkx=8PrintM(2+M(x))EndSub运行程序，单击命令按钮，在窗体上显示的是（）。A）6B）5C）7D）8（24）以下关于过程

3、及过程参数的描述中，错误的是（）。A）调用过程时可以用控件名称作为实际参数B）用数组作为过程的参数时，使用的是“传地址”方式C）只有函数过程能够将过程中处理的信息传回到调用的程序中D）窗体（Form）可以作为过程的参数（25）在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：PrivateXAsIntegerPrivateSubCommand1_Click()X=5:Y=3Callproc(X,Y)Label1.Caption=XLabel2.Caption=YEndSubPrivateSubproc(aA

4、sInteger,ByValbAsInteger)X=a*a本资料由大家论坛计算机等级考试专区收集整理二级VisualBasic语言程序设计试卷第4页（共10页）Y=b+bEndSub程序运行后，单击命令按钮，则两个标签中显示的内容分别是（）。A）25和3B）5和3C）25和6D）5和6（26）在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明：PrivateTypePersonnameAsString*8majorAsString*20EndTypeDimpAsPerson设文本框中

5、的数据已正确地赋值给Person类型的变量p，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是（）。A）Open"c:Test2.dat"ForOutputAs#1Put#1,1,pClose#1B）Open"c:Test2.dat"ForRandomAs#1Get#1,1,pClose#1C）Open"c:Test2.dat"ForRandomAs#1Len=Len(p)Put#1,1,pClose#1D）Open"c:Test2.dat"ForRandomAs#1Len=Len(p)Get#1,1,pClose#1（27）在窗

6、体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori=0To50i=i+3n=n+1Ifi>10ThenExitForNextText1.Text=Str(n)EndSub程序运行后，单击命令按钮，在文本框中显示的值是（）。A）2B）3C）4D）5（28）假定有以下循环结构DoUntil条件表达式循环体Loop则以下正确的描述是（）。本资料由大家论坛计算机等级考试专区收集整理二级VisualBasic语言程序设计试卷第5页（共1

7、0页）A）如果“条件表达式”的值是0，则一次循环体也不执行B）如果“条件表达式”的值不为0，则至少执行一次循环体C）不论“条件表达式”的值是否为“真”，至少要执行一次循环体D）如果“条件表达式”的值恒为0，则无限次执行循环体（29）在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimI,NumRandomizeDoForI=1To1000Num=Int(Rnd*100)PrintNum;SelectCaseNumCase12ExitForC