VB基础模拟演练选考题（有答案）.docxVIP

B组　选考题组 1.如下图所示,该流程图所表示的算法违背了算法的有穷性特征,下列修改方法中,可以改正该 错误的是(　　) A.将①处改为 i←0 B.将②处改为 s≥0? C.将③处改为 i←i-2 D.将④处改为 s←s-i 2.有一数列1,2,3,5,8,13,……,从第3项起,每项等于它相邻的前2项之和。求在该数列中第 一个超过1000的数是第几项。解决此问题的部分算法流程图如图所示:图中空白处理框①和②处应填入的是(　　) A.①b←a② C.①a←c②i 3.随机产生10个[1,99]中的整数,依次存储到数组变量a(1)~a(10)中。实现此功能的部分算法流程图如图所示，图中空白处理框①和②处应填入的是(　　) A.①i← B.① C.①a(i)← 4.在Visual Basic窗体中,当前对象的属性窗口如下图所示,下列说法正确的是(　　) A.该对象属于标签类 B.该对象属于文本框类 C.当前该对象的Caption属性值是“转换” D.当前该对象的Font属性值是“仿宋体” 5.(2015浙江学考导引)小李在设计VB程序时所使用复选框对象的属性窗口如图所示,他想编制该复选框单击事件的处理过程,则该事件处理过程名是(　　) A.CheckBox_Click() B.加粗_Click() C.Check1_Click() D.复选框_Click() 6.一个VB工程的部分设计界面如图所示。下列说法不正确的是(　　) 　　　 ①工程文件名是“工程1.vbp” ②该工程只有1个窗体 ③窗体文件名是“Form.frm” ④窗体名称是“寻找水仙花数” A.①② B.②③ C.①③ D.③④ 7.(2016杭州二中第一学期期末)VB语句List1.addItem d(i)的作用是把数组d的数据添加到列表框对象List1中。该语句中的“addItem”是(　　) A.属性名 B.属性值 C.方法 D.事件 8.运行如下Visual Basic程序,单击命令按钮Command1,出现如图所示的出错信息。 Private Sub Command1_Click() 　Dim a As Integer,b As Integer 　a=10 ‘① 　b=20 ‘② 　Text1.Text=“a+b=”+Val(a+b) ‘③ End Sub ‘④ 发生“类型不匹配”错误时所执行的语句是(　　) A.① B.② C.③ D.④ 9.(2016嘉兴3月选考模拟)如图所示程序段中,a(5)不是数组元素的是(　　) A.① B.② C.③ D.④ 10.(2015宁波期末)编写Visual Basic程序,求n!(说明:n!=1×2×3×…×n)。 (1)这个程序主要采用的算法结构是　　　　(①分支结构　②顺序结构　③循环结构)。? (2)程序运行,在Text1中无论输入什么数,发现在Text2中输出的都是0,原因:①　n的初值是0　　　,? Private Sub Command1_Click()Dim　m　As　IntegerDim　n　As　IntegerDim　i　As　Integerm=Val(Text1.Text)n=0For　i=1 To m　 n=n * iNextText2.Text=Str(n)End Sub 应该如何修改程序?②　把n=0改为n=1　　　。? (3)上述错误修改成功后,程序运行时,在Text1中输入5,按“计算”按钮,则在Text2中输出120,如下图左所示: 但是当输入10的时候,则跳出一个实时错误,提示“溢出”,如上右图所示。产生该错误的原因是:①　n的值超出了定义的范围　　　,为了能计算出10的阶乘,应该怎么修改程序?②　将Dim　n　As　Integer　改为Dim　n　As　long　　　　　。? 11.(2015浙江9月学考+选考模拟加试题)有如下VB程序: Dim i As Integer,j As Integer,k As String,n As Integer n=3 List1.Clear For i=1 To n 　k=“” 　For j=1 To i 　　k=k+“*” 　Next j 　List1. AddItem k Next i 该程序运行后,在列表框List1中显示的是(A　) 12.(2016台温丽衢第一学期期末)【加试题】编写VB程序,功能如下:在文本框Text1里输入数学表达式(表达式的长度=100),在列表框List1里输出所有配对括号在表达式中的位置。如在文本框Text1里输入“12*(3-(1+2))*3”,运行效果如图所示。实现上述功能的VB代码如下,在划线的地