在窗体上画一个名称为File的文件列表框，并编写如下程序： Private Sub File1_DblClick（)x=Shell（F

在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub FUel_DblClick() x=Shell(File1_ileName，1) End Sub 以下关于该程序的叙述中，错误的是()。

A．x没有实际作用，因此可以将该语句写为：Call Shell(Filel.FileName,1)

B．双击文件列表框中的文件，将触发该事件过程

C．要执行的文件的名字通过File1.FileName指定

D．Ffle1中显示的是当前驱动器、当前目录下的文件

列表框，两个名称分别为Label1、Label2、标题分别为空白和“共有文件”的标签。编写程序，使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签Labell中显示当前文件夹中文件的数量。如下图所示。

能够正确实现上述功能的程序是()。

在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub Filel_DblClick() x=Shell(Filel. FileName, 1) End Sub 以下关于该程序的叙述中，错误的是______。

A．x没有实际作用，因此可以将该语句写为：Call Shell(Filel. FileName, 1)

B．双击文件列表框中的文件，将触发该事件过程

C．要执行的文件的名字通过Filel. FileName指定

D．Filel中显示的是当前驱动器、当前目录下的文件

在窗体上画一个名称为File1的文件列表框，并编写如下程序：

Private Sub File1_DblClick（）

x=Shell（File1.FileName,1）

End Sub

以下关于该程序的叙述中，错误的是（）。

A．x没有实际作用，因此可以将该语句写为：Call Shell（File1,FileName,1）

B．双击文件列表框中的文件，将触发该事件过程

C．要执行的文件的名字通过File1.FileName指定

D．File1中显示的是当前 驱动 器、当前目录下的文件

在窗体上画1个组合框(名称为Cbl，设置为简单组合框)和1个命令按钮(名称为C1，标题为“添加”)，编写适当的事件过程。程序运行后，在组合框中输入一个列表项，单击命令按钮后，程序检查组合框的下拉列表，如果列表中没有此项，则把此项添加到列表中；如果有此项，则通过信息框提示“此项已存在”，并清除输入的内容。程序的运行情况如图2—1所示。

存盘时，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。

2．在窗体上画一个名称为L1的列表框，通过属性窗口向列表框中添加3个项目，分别为“123”、“456”和“789”。编写适当的事件过程。程序运行后，每次双击列表框中的任何一项，则总在最后面添加一项，该项的内容为前面所有项之和。程序的运行情况如图2—2所示。

注意：保存时必须存放在考生文件夹下，窗体文件名为sjt4.frm，工程文件名为sjr4.vbp。

示“AAAA”(如图2—1所示)；再建立一个名称为Cmd1，标题为“清除”的命令按钮，编写适当的事件过程。要求程序运行后，如果单击“清除”命令按钮，则清除文本框中所显示的信息。

注意：保存时必须存放在考生文件夹下，窗体文件名为sjt3.frm，工程文件名为sit3.vbp。

2．在考生文件夹中有工程文件sit4.vbp，它包含一个窗体文件form1。在窗体上有一个列表框，名称为List1，一个文本框，名称为Text1，和一个命令按钮，名称为Command1，标题为“复制”。要求程序运行后，在列表框中自动建立四个列表项，分别为“项目1”、“项目2”、“项目3”、“项目4”。如果选择列表框中的一项，则单击“复制”按钮时，可以把该项复制到文本框中(程序运行结果如图2—2)。

要求：编写程序，以实现试题要求的功能。

注意：存盘时必须放在考生文件夹下，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。

在窗体上画一个名称为CommandDialog1的通用对话框，一个名称为Command1的命令按钮。

然后编写如下事件过程：

Private Sub Command1_Click（）

CommonDialog1.FileName =""

CommonDialog1.Filter="All file|*.*|（*.Do

C．|*.Doc|（*.Txt）|*.Txt"

CommonDialog1.FilterIndex=2

CommonDialog1.DialogTitle="VBTest"

CommonDialog1.Action=1

End Sub

对于这个程序，以下叙述中错误的是（）。

A．该对话框被设置为“打开”对话框

B．在该对话框中指定的默认文件名为空

C．该对话框的标题为VBTest

D．在该对话框中指定的默认文件类型为文本文件（*.Txt）

请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。

（1）在Form1的窗体上画一个名称为Pic1的图片框，然后建立一个主菜单，标题为"命令"，名称为Com，该菜单有两个子菜单，其标题分别为"输出"和"删除"，名称分别为Pri和Del，编写适当的事件过程。程序运行后，如果单击"命令"菜单中的"输出"命令，则将图片框显示出来；如果单击"删除"命令，则隐藏图片框。程序的运行情况如图27-1和图27-2所示。

图27-1

图27-2

注意：存盘时必须存放在考生文件夹下，工程文件名为sj1.vbp，窗体文件名为sj1.frm。程序中不得使用任何变量。

（2）在窗体上画一个列表框，名称为List1，通过"属性"窗口向列表框中添加3个项目，分别为"足球"、"篮球"和"排球"。编写适当的事件过程，使程序运行后，每次单击列表框中的任何一项，则总在最后面添加一项"体育活动"。程序运行界面和运行效果分别如图27-3和图27-4所示。

图27-3

图27-4

注意：存盘时必须存放在考生文件夹下，工程文件名为sj2.vbp，窗体文件名为sj2.frm。程序中不得使用任何变量。

在窗体上画一个名称为Listl的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为()。