2012年9月计算机等级考试二级VB程序设计考前全真模拟试卷（四）

（13）在窗体上建立一个单选按钮Option1和一个图片框Picture1,如图所示。当选择不同的单选按钮时，图片框中填充不同的图案，请填写程序的空白处，使程序完整。

         Private Sub Optionl_Click（）

         Dim H,W

       Picture1.Cls

             Picturel.FillStyle=________

       W=Picturel.ScaleWidth/2

       H=Picturel.ScaleHeight/2

       Picture1.Circle(W,H),W/2

         End Sub

（12）下列事件过程的功能是：建立一个名为Datal的随机文件，存放在角度值及这些角度的正炫函数值和余弦函数值，角度为1,2,3···，90.请在空白处填上合适的代码，将程序补充完整。

         Pivate Type Ang

             K As Integer

             Sinx As Single

             Cosx As Single

         End Type

        定义Ang类型的变量Ksc

         Pivate Sub Form_Click()

         Dim Y As Single

             Open "C:\Datal.txt"For Random As#1 Len=10

             Put#1,1,Ksc

             Y=3.14159/180

             For i=1 To 90

           Ksc.K=i

           _______=Sin(i*Y)给变量Ksc的正弦函数值赋值

                 Ksc.Cosx=Cos(i*Y)

      Next i

      Close#1

         End Sub

（11）设有下列程序查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。

           Option Base 1

           Private Sub Command1_Click()

           Dim arr1

           Dim Min As Integer,i As Integer

         Arr1=Array(12,435,76,-24,78,54,866,43)

         Min=arr1(1)

         For i=2 To 8

       If arr1(1)

Next i

           Print"最小值："；Min

           End Sud

（10）如果在立即窗口中执行下列操作：

a=8

         b=9

         Print(a>b)；

         则输出结果是。

（9）下列程序的输出结果是。

           Sub Prin()

         Dim B As String

         A=1

         B=A & Space(4)&A

         PrintA

         Print trim(B)

           End Sub

（7）已知变量boo1Var是一个布尔型的变量，如果要给其赋值为True,则正确的赋值语句就是。

（6）鼠标移动经过控件时，将触发控件的事件。

（8）下列这个Sub过程的功能是统计字符串中“a”的个数，请在空白处填上合适的代码，将程序补充完整。

Private Sub numCount()

         Dim num As Integer

         s$="software And hardware"

         Num=Len(s$)

         For i=1 unm

      b$=。

         If b$="a"Then x=x+1

         Next i

         Print"x="；x

End Sub 

（5）在链表的运算过程中，能够使空表与非表的运算统一的结构是。

（4）最简单的交换排序方法是。

（3）在面向对象方法中，描述的是具有相似属性与操作的一组对象。

（1）数据库系统的主要特点为数据集成性、数据的高和低冗低余性、数据独立性和数据统一管理和控制。

（2）数据库的逻辑模型设计阶段的任务是将转换成关系模式。

（35）在C盘当前文件夹下有一个已经建立好的顺序文件Alph.txt,文件内容为只含有字母的一个字符去、串（有双引号界定符）。单击窗体，打开Alph.txt文件，读取字符串显示在文本框Text1中，最后将重新排列的字符串存入AipO.txt文件中（无双引号界定符）。请选择横线处合适的语句  

         Private Sub Fom_Load()

           Dim StrIn As String,StrOut As String

         Open"C/:Alph.txt"For Input As#1

       ______

         Close

         Text1.Text=StrIn

                   ______

         Text2.Text=StrOut

         Open"C/:AlpO.txt"For Output As#2

       ______

         Close       

           End Sub

           Private Function StrSort(s As String)As String

           Dim sArr()As String*1,i As Integer,j As Integer,n As Integer

           Dim t As String*1

         n=Lem(s)

         Redim sArr(n)

         For i=1 To n

       sArr(i)=Mid(s,i,1)

         Next i

         For i=1 To n-1

       For j=i+1 To n

           If sArr(i)>sArr(j)Then

          t=sArr(i):sArr(i)=sArr(j):sArr(j)=t

           End If

       Next j,i

       For i=1 To n

      StrSort=StrSort&sArr(i)

       Next i

           End Function

（34）下列叙述中不正确的是

（32）假定建立一个名为Command1的命令按钮数组，则下列说法中错误的是

（33）如果在C盘当前文件夹下已经存在名称为Sdat.dat的顺序文件，那么执行语句Open"c:Sdat.dat"For Append As#1之后，将

（30）下列能判断是否到达文件尾的函数是         

（31）下列语句用于打开一个顺序文件Open"C:\MyFile.txt"For OutPut,但该语句的一个重要错误是没有

（29）设已打开5个文件，文件号为1、2、3、4、5.要关闭所有文件，则下列语句正确的是

（28）下列关于多重窗体程序的叙述中，错误的是         

（27）对话框在关闭之前，不能继续执行应用程序的其他部分，这种对话框属于

（24）Function过程与Sub过程的最主要区别是

（25）在窗体上有一个命令按钮Commandl，编写下列程序：

         Private Sub Command1_Click()

        Print ppl(3,7)

         End Sub

         Public Funcion ppl(x As Single,n As Integer)As Single

       If n=0 Then

      ppl=1

        Else           

      If n Mod 2=1 Then

           ppl=x*x+n

       Else

           ppl=x*x-n

       End If

        End If

          End Funcion

         程序运行后，单击该命令按钮，屏幕上显示的是 

（26）设有下列过程：

           Private Sub ppp(As Single,b As Single)     

（23）在子过程Sub…End Sub中使用的形式参数可以是   

（22）过程语句中，使用的<参数表>可以是下列哪种

（20）下列关于图片框控件的语句中不正确的是

（21）为了使列表框中的项目分为多列显示，需要设置的属性为。 

（18）关于多行结构条件语句执行过程，正确的说法是

（19）执行下列程序段后，整型变量n的值为

          n=0

          For i=1 To 20 Step 5

        N=n+1 

          Next i

（17）设置合框Combol中3个项目，则下列能删除最后一项的语句是         

（16）设置复选框或单选按钮的标题对齐方式的属性是

假定在图片框控件Picturel中装入了一个图形，为了在程序运行时清除该图形，则应使用下列哪种方式     

（14）要使文本框获得输入点，则应采用文本框控件的方法

（12）在文本框中输入密码时，要求在文本框中显示（*）号，则应当设置此文本框的

（13）通过文本框的属性可以获得当前插入点所在的位置。

（11）设x=4,y=8,z=7,下列表达式的值是  

（10）在数据库设计中，将E-R图转换为关系模式的郭村个属于

（9）用链表表示线性表的优点是。

（8）下列对于软件测试的描述正确的是

（7）软件需求分阶段的工作，可分为4个方面：需求获取、需求分析、编写需求规格说明以及         

（6）关于结构化程序设计原则和方法的描述错误的是。

（5）下列选项中不属于结构化程序设计方法的是。

（4）线性表进行二分法检索，其前提条件是。

（3）下列工具中为需求分析常用工具的是。

（2）结构化分析方法是面向的自顶向下、逐步求精进行需求分析的方法。

（1）下列选项中，不是一个算法的基本特征的是。