单选题下面说法中正确的是( )。
单选题在数据库系统的内部结构体系中，索引属于( )。
单选题在窗体上有一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签Label1中显示当前文件夹中文件的数量。下列能够正确实现上述功能的程序是( )。
单选题在窗体上画一个名称方List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列正确实现上述功能的程序是______。
单选题假定编写如下事件过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) If(Button and 3)=3 then Print"Hello" End if End Sub 程序运行后，为了在窗体上输出“Hello”，应该窗体上执行以下( )操作。
单选题下面可以识别功能键F1的事件是
单选题设在工程文件中有一个标准模块，其中定义了如下记录类型： Type Books
Name As String*10 TelNum As String*20
End Type
在窗体上画一个名为Commandl的命令按钮，要求当执行事件过程Commandl_Click时，在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是______。
A.Private Sub Commandl_Click() Dim BAs Books
Open"Person.txt"For Output As#1 B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码") Write #1,B.Name,B.TelNum
Close#1 End Sub B．Private Sub
Commandl_Click() Dim BAs Books Open"Person.txt"For
Input As#1 B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码") Print #1,B.Name,B.TelNum
Close#1 End Sub C．Private Sub Commandl_Click()
Dim BAs Books Open"Person.txt"For Output As#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码") Write #1,B
Close#1 End Sub
D.Private Sub Commandl_Click() Open"Person.txt"For Input
As#1 Name=lnputBox("输入姓名")
TelNum=InputBox("输入电话号码") Print #1,Name,TelNum
Close#1 End Sub
单选题假设有程序代码如下：Form1.Caption="Open"，这里Form1、Caption和Open分别代表______。
单选题Randomize语句的功能是
单选题为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click() a％=10：b％=20 Call swap(a，b) Print a，b End Sub Private Sub swap(ByVal a As Integer，ByVal b As Integer) c=a：a=b：b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是
单选题在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填()。图20-1PrivateSubText1__________()Text2.Text=Text1.TextEndSub
单选题通用对话框Filter属性的作用是( )。
单选题在 Visual Basic中，要将一个窗体从内存中释放，应使用的语句是（ ）。
单选题如果将命令按钮的访问键设置为“D”，以下不会触发命令按钮Click事件的操作是
单选题窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等)，一个名称为Timer1的计时器，并有下面程序代码：Dim r As Single，flag As Integer Private Sub Timer1_Timer()Private Sub Form_Load() If flag=0 Thenr=Shape1．Width Shape1．Width=Shape1．Width-10Timer1．Enabled=True If Shape1．Width＜=100 ThenTimer1．Interval=500 flag=1End Sub End IfElseShape1．Width=Shape1．Width+10If Shape1．Width＞=r Thenflag=0End IfEnd IfEnd Sub运行程序后产生的结果是
单选题为了同时改变一个活动控件的高度和宽度，正确的操作是
单选题如果一个变量未经定义就直接使用，则该变量的类型为____________。
A.Integer
B.Byte
C.Boolean
D.Variant
单选题在窗体上画一个命令按钮，然后编写下列程序： Private Sub Command1 click( ) Dim a As Single，b As Single a=6:b=2 RC a，b Print a，b End Sub Sub RC(x As Single，y As Single) i=x x=i/y y=i Mod y End Sub
单选题设A="12345678"，则表达式Val(Len(A,4)+Mid(A,4,2))的值为______。
单选题使“计算机技术”在当前窗体上输出的语句是（ ）。