2014年3月计算机二级考试VF临考预测试卷及答案8

　　21.在窗体上画1个名为Textl的文本框和1个名为Labell的标签，再画4个名为Opl 的单选按钮控件数组，其Index属性按季度顺序为0～3，如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按钮，则Text1中显示相应季度的销售总额，并把相应的文字显示在标签上。如图2所示是单击“第二季度”单选按钮所产生的结果。请选择可在空白处填写的合适语句( )。

　　Option Base 1

　　Dim sales(12)As Long

　　Private Sub Fo rm Load()

　　Open"C：\sales.txt"For Input As#1

　　For k=1 To 12

　　Input#1，sales(k)

　　Nextk

　　Close#1

　　End Sub

　　Private Sub (Index As Integer)

　　Dim sum As Long，k As Integer，month As Integer

　　sum=0

　　month=In&x*

　　For k=1 To 3

　　month=month+1

　　sum=sum+sales(month)

　　Next k

　　Label1.Caption=________.Caption&"销售总额："

　　Text1=Sum

　　End Sub

　　A.Op1_Click 3 Op1(Index)

　　B.Op1_Click 0 Option1(Index)

　　C.Option1_Click l Op1(Index)

　　D.Option1_Click 2 Option1(Index)

　　22.在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程：

　　Private Sub Text1_KeyPress(KeyAscii As Integer)

　　Dim str As String，n As Integer

　　str=UCase(Chr(KeyAscii))

　　n=Len(str)。

　　Text1.Text=String(n，str)

　　End Sub

　　程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。

　　A.pp

　　B.pp

　　C.pp

　　D.pp

　　23.下列程序执行后，变量X的值为( )。

　　Dim fl，b，C，d As Single

　　Dim X As Single

　　f1=10

　　b=30

　　c=400

　　If b>fl Then

　　d=fl：fl=b：b=d

　　End If

　　If b>C Then

　　X=b

　　Else If fl>c Then

　　X=c

　　Else

　　X=a

　　End If

　　A.10

　　B.30

　　C.400

　　D.430

　　24.下列程序的运行结果是( )。

　　Private Function myfun(m，n)

　　Do while m>n

　　Do While m>n：m=m-n：Loop

　　Do Wllile n>m：n=n-m：Loop

　　Loop

　　myfun=m

　　End Function

　　Private Sub Command1_Click()

　　print myfun(9，8)

　　End Sub

　　A.2

　　B.1

　　C.4

　　D.3

　　25.为了使列表框中的项目分为多列显示，需要设置的属性为( )。

　　A.Columns

　　B.Style

　　C.List

　　D.MultiSelect

　　26.假定有一个菜单项，名为Menultem，为了在运行时使该菜单项不可见，应使用的语句为( )。

　　A.Menultem.Enabled=False

　　B.MenuItem.Enabled=True

　　C.MenuItem.Visible=True

　　D.Menultem.Visible=Flase

　　27.在通用对活框中打开“颜色对话框”的方法是( )。

　　A.ShowOpen

　　B.Menultem.Enabled—True

　　C.MenuItem.Visible—True

　　D.Menultem.Visible—Flase

　　28.下列操作不能向工程中添加窗体的是( )。

　　A.执行“工程”菜单中的“添加窗体”命令

　　B.单击工具栏中的“添加窗体”按钮 .

　　C.右击窗体。在弹出的菜单中选择“添加窗体”命令

　　D.右击T程资源管理器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择：“添加窗体”命令

　　29.窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：

　　DimY As Integer

　　Private Sub Command1 Click()

　　Dim X As Integer

　　x=2

　　Text1.Text=p2(p1(X)，Y)

　　Text2.Text=p1(x)

　　End Sub

　　Private Function p1(X As Integer)As Integer

　　x+x+v: y=x+y

　　p1=x+y

　　End Function

　　Private Function p2(X As Integer，Y As Integer)As Integer

　　p2=2*x+y

　　End Function

　　当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为( )。

　　A. 2 4

　　2 4

　　B. 2 4

　　4 8

　　C. 4 4

　　8 8

　　D. 10 10

　　58 58

　　30.下列描述不正确的是( .)。

　　A.某个子过程中声明的局部变量，其使用范围仅限定于该子过程内

　　B.某个子过程中声明的局部变量，其生命周期仅限于该子过程被执行过程中

　　C.不同子过程中的局部变量可以具有相同的名称

　　D.不同子过程中具有相同的名称的局部变量是同一变量

　　相关推荐：

　　2014年全国计算机二级考试VF上机冲刺试卷汇总

　　考试吧考后首发2014年3月计算机二级真题及答案通知

　　考试吧推荐：2014年3月计算机二级考前冲刺备考专题