21．设有如下程序： 
Option Base 0 
Private Sub Form_Click() 
  Dim a 
  Dim i As Integer 
  a=Array(1，2，3，4，5，6，7，8，9) 
  For i=0 To 3 
    Print a(5-i)； 
  Next 
End Sub 
程序运行后，单击窗体，则在窗体上显示的是(    )。 
A．4 3 2 1  
B．5 4 3 2 
C．6 5 4 3  
D．7 6 5 4 
22．为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是(    )。 
A．Visible  
B．Timer 
C．Enabled  
D．Interval 
23．下列说法正确的是(    )。 
A．任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器 
B．只有当代码窗口为当前活动窗口时，才能打开菜单编辑器 
C．只有当某个窗体为当前活动窗体时，才能打开菜单编辑器 
D．任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器 
24．假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。 
Model1代码如下： 
Public X As Integer 
Public Y As Integer 
Sub S1() 
  x=1 
  S2 
End Sub 
Sub S2() 
  y=10 
  Form1．Show 
End Sub 
Model2的代码如下： 
Sub Main() 
  S1 
End Sub 
其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是(    )。 
A．Form1→Model1→Model2 
B．Model1→Model2→Form1 
C．Model2→Model1→Form1 
D．Model2→Form1→Model1 
25．在窗体上有一个命令按钮，然后编写如下事件过程： 
Private Sub Command1Click() 
  Dim a(5)As String 
  For i=1，To 5 
    a(i)=Chr(Asc("A")+(i-1))  
  Next i 
  For Each b In a 
    Print b； 
  Next 
End Sub  
程序运行后，单击命令按钮，输出结果是(    )。 
A．ABCDE  
B．1 2 3 4 5 
C．abcde  
D．出错信息 
26．设a=2，b=3，c=4，d=5，下列表达式的值是(    )。 
Not a<=c Or 4*C=b^2 And b<>a+C 
A．-1  
B．1 
C．True  
D．False 
27．窗体上有文本框Text1和一个菜单，菜单标题、名称见表，结构见图。要求程序执行时单击“保存”菜单项，则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是(    )。

 
A．Private Sub save Click() 
      Text1．Text=file．save．Caption 
End Sub 
B．Private Sub save Click() 
  Text1．Text=save．Caption 
End Sub 
C．Private Sub file Click() 
  Text1．Text=file．save．Caption 
End Sub 
D．Private Sub file Click() 
  Text1．Text=save．Caption 
End Sub 
28．在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮，运行后的窗体外观如图所示：

 
设有如下的类型和变量声明： 
Private Type Person 
  name As STRING*8 
  major As String*20 
End Type 
Dim P As Person 
设文本框中的数据已正确地赋值给Person类型的变量P，当点击“保存”按钮时，能够 
正确地把变量中的数据写入随机文件Test2．dat中的程序段是(    )。 
A．Open"C：＼Test2．dat"For Output As#1 
Put#1，1，p 
Close#1 
B．0pen"c：＼Test2．dat"For Random As#1 
Get#1，1，P 
Close#1 
C．Open”C：＼Test2．dat”For Random As#1 Len—Len(p) 
Put#1，1，P 
Close#1 
D．Open"C：＼Test2．dat"For Random As#1 Len=Len(p) 
Get#1，1，P 
Close#1 
29．以下叙述中错误的是(    )。 
A．一个工程中可以包含多个窗体文件 
B．在一个窗体文件中用Private定义的通用过程能被其他窗体调用 
C．在设计Visual Basic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件 
D．全局变量必须在标准模块中定义 
30．Sub过程与Function过程最根本的区别是(    )。 
A．Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以 
B．Function过程可以有形参，Sub过程不可以 
C．Sub过程不能返回值，而Function过程能返回值 
D．两种过程参数的传递方式不同

首页 1 2 尾页