单选题在数据管理技术发展的三个阶段中，数据共享最好的是( )。
单选题对下列程序段，说法正确的是（ ）。
Text1．Top=2000
Text1．Left=800
单选题如果要向工具箱中加入控件和部件，可以利用“工程”菜单中的______命令。
单选题窗体上有一个名称为Cornmand1的命令按钮。其单击事件过程如下：
Private Sub Command1_Click()
Open"c:/f1.txt" For Input As#1:Open"c:/f2.txt"For Output As#2
Do While Not EOF(1)
Line Input#1, str1:Print#2, str1
Loop
Close
End Sub
以下关于上述程序的叙述中，错误的是
单选题列表框用于列出可供用户选择的项目列表，下列______属性用来存放所有的列表项。
单选题假定有如下事件过程： Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Sinsle，Y As Single) If Button=2 then PopupMenu popForm End If End Sub 则以下描述中错误的是
单选题若变量a未事先定义而直接使用(例如：a=0)，则变量a的类型是
单选题窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，其事件过程如下：Private Sub Command1_Click() CD1.Filter = "All File|*.*|Word|*.Doc|*.exe|*.exe" CD1.FilterIndex = 2 CD1.DialogTitle = "Open File" CD1.FileName = "E:/Test.doc" CD1.InitDir = "E:" CD1.ShowOpenEnd Sub对于以上程序，以下叙述中错误的是
单选题在Visual Basic应用程序中，以下正确的描述是 ______。
A. 过程的定义可以嵌套，但过程的调用不能嵌套
B. 过程的定义不可以嵌套，但过程的调用可以嵌套
C. 过程的定义和过程的调用均可以嵌套
D. 过程的定义和过程的调用均不能嵌套
单选题有如下程序：Private Sub Command1_Click() Dim i As Integer， j As Integer Dim sum As Integer n＝1 Do j＝1 Do sum＝sum＋j j＝j＋1 Print j； Loop Until j>3 n＝n＋2 Loop Until n>10 Print sumEnd Sub运行上述程序，外层Do循环执行的次数为( )。
单选题在通用过程中，为了把某个参数定义为可变参数，应使用的关键字是
单选题为了实现鼠标自动拖放，必须把( )属性设置为1；而为了执行手动拖放，必须把该属性设置为0。
单选题以下叙述中错误的是________。
A.一个工程中只能有一个Sub Main过程
B.窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
C.窗体的Hide方法和Unload方法的作用完全相同
D.若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体
单选题设文本框的PasswordChar属性被设置为“％”。程序运行时，在文本框中输入了“OK”，则产生的结果是( )。
单选题在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；六个标签，名称分别为Label1、Label2、Label3、Label4、Label5、Label6，其中标签Label4～Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条的数值，Label3显示A*B的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现上述功能的事件过程是______。 A) Private Sub Command1_Click() Label3. Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End Sub B) Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End Sub C) Private Sub Command1_Click() Label3.Caption=HScroll1*HScroll2 End Sub D) Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub
单选题单击一次窗体之后，下列程序代码的执行结果为______ 。 Private Sub Command1_ Click() Dim x As Integer, y As Integer, z As Integer x = 1: y = 2: z = 3 Call fun1 (x, y, z) Print x; y; z Call fun2(x, y, z) Print x; y; z End Sub Private Sub fun1(x As Integer, y As Integer, z As Integer) x = 10 * z y=z*z+ x z=x+ y+ z End Sub Private Sub fun2 (ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) x=10*z y=z*z+ x z=x+ y +z End Sub
单选题在窗体上画一个命令按钮，然后编写如下程序： Sub S1(ByVal x As Integer,ByVal y As Integer) Dim t As Integer t=x x=y y=t End Sub Private Sub Command1_Click() Dim a As Integer,b As Integer a=10 b=30 S1 a，b Print"a="；a；"bc"；b End Sub 程序运行后，单击命令按钮，输出结果是： ______。
单选题在窗体上画的3个名称为Command1命令按钮是控件数组，从左到右，控件数组下标分别为0、1、2。如图1所示。有下列程序：PrivateSubCommand1_Click(IndexAsInteger) DimsAsString SelectCaseIndex Case0 s="飞机" Case1 s="汽车" Case2 s="火车" EndSelect MsgBoxs,IndexEndSub执行程序后，单击中间那个按钮，显示的对话框的形式为________。
单选题以下对文件分类的划分不正确的是( )。
单选题在窗体上添加一个文本框，其名称为text1，然后编写如下的Load事件过程，则该程序的运行结果是______。Private Sub form_ load Text1. Text = " " t = 1 for k = 10 To 6 Step -2 t= t* k Next k Text1. Text = tEnd Sub