更多"在窗体上画一个名称为File的文件列表框，并编写如下程序： Pri"的相关试题:
[单项选择]在窗体上画一个名称为File的文件列表框，并编写如下程序：
Private Sub File1_DblClick( )
x=Shell(File1．FileName，1)
End Sub
以下关于该程序的叙述中，错误的是（ ）。
A. x没有实际作用，因此可以将该语句写为：Call Shell(File．FileName，1)
B. 双击文件列表框中的文件，将触发该事件过程
C. 要执行的文件的名字通过File1．FileName指定
D. File1中显示的是当前驱动器、当前目录下的文件
[单项选择]在窗体上画一个名称为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中显示的是当前驱动器、当前目录下的文件
[单项选择]在窗体上画一个名为List1的列表框、一个名为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
A. Private Sub List1_Click() Label1. Caption=List1. ListIndex End Sub
B. Private Sub List1_Click() Label1. Name=List1. ListIndex End Sub
C. Private Sub List1_Click() Label1. Name=List1. Text End Sub
D. Private Sub List1_Click() Label1. Caption=List1. Text End Sub
[单项选择]在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub Filel_DblClick（ ） x=Shell(Filel. FileName, 1) End Sub 以下关于该程序的叙述中，错误的是______。
A. x没有实际作用，因此可以将该语句写为：Call Shell(File FileName, 1)
B. 双击文件列表框中的文件，将触发该事件过程
C. 要执行的文件的名字通过File FileName指定
D. Filel中显示的是当前驱动器、当前目录下的文件
[单项选择]在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub FUel_DblClick（ ） x=Shell(File1_ileName，1) End Sub 以下关于该程序的叙述中，错误的是( )。
A. x没有实际作用，因此可以将该语句写为：Call Shell(FileFileName,1)
B. 双击文件列表框中的文件，将触发该事件过程
C. 要执行的文件的名字通过File1.FileName指定
D. Ffle1中显示的是当前驱动器、当前目录下的文件
[单项选择]在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drivel、Dirl和Filel。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dirl_Change事件过程中应使用的语句是______。
A. DirveDrive=DirPath
B. DirPath=DriveDrive
C. DirPath=FilePath
D. FilePath=DirPath
[单项选择]在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_Change事件过程中应使用的语句是______。
A. Dirve1.Drive=Dir1.Path
B. Dir1.Path=Drive1.Drive
C. Dir1.Path=File1.Path
D. File1.Path=Dir1.Path
[单项选择]在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dirl—Change事件过程中应使用的语句是： ______。
A. Dirve1.Drive=Dir1.Path
B. Dir1.Path=Drive1.Drive
C. Dir1.Path=FilePath
D. File1.Path=Dir1.Path
[单项选择]在窗体上画一个名为Command1的命令按钮，然后编写以下程序：
Private Sub Command1_Click（ ）
Dim M(10)As Integer
For k=1 To 10
M(k)=12-k
Next k
x=8
Print M(2+M(x))
End Sub
运行程序，单击命令按钮，在窗体上显示的是
A. 6
B. 5
C. 7
D. 8
[单项选择]在窗体上画一个名称为Listl的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是
A. Private Sub List1_Click() Label1.Caption=List1.ListIndex End Sub
B. Private Sub List1-Click() Label1.Name=List1.ListIndex End Sub
C. Private Sub List1_Click() Label1.Name=List1.Text End Sub
D. Private Sub List1_Click() Label1.Caption=List1.Text End Sub
[单项选择]在窗体上画一个名称为List1的列表框，一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是 ______。
A. Private Sub List1_Click() Label1.Caption=List1.ListIndex End Sub
B. Private Sub List1_click() Label1.Name=List1.ListIndex End Sub
C. Private Sub List1_click() Label1.Name=List1.Text End Sub
D. Private Sub List1_Click() Label1.Caption=List1.Text End Sub
[单项选择]在窗体上画一个名称为Drivel的驱动器列表框，一个名称为Dirl的目录列表框。当改变当前驱动器时，目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是
A. Drivel change
B. Drive1_Click
C. Dirl_Click
D. Dirl_Change
[单项选择]在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分虽为Lahel1、Label2，标题分别为空白和 "共有文件"的标签。编写程序，使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签Label1中显示当前文件夹中文件的数量。如图所示。能够正确实现上述功能的程序是
A. Private Sub Dir1_Change( ) FilePath=Dir1．Path End Sub Private Sub Dive1_Change( ) Dir1．Path=Drive1．Drive Label1，Caption=File1 ListCount End Sub
B. Private Sub Dir1_Change( ) FilPath=Dtr1．Path End Sub privage Sub Dive1_Change( ) Dir1．path=Drive1．Drive Lahel1．Caption=File1．List End Sub
C. Private Sub Dir1_Change( ) File1. Path = DirPath Label1．Caption＝File1, ListCount End Sub Private Sub Drive1_Change( ) Dir1．Path = Drive1. Drive Label1．Captiol1 = File1．ListCount End Sub(
D. Private Sub Dir1_Change( ) File Path = DirPath Label1．Caption = File1．ListCount End Sub Private Sub Dive1_Change( ) Dir1．Path = Drive1．Drive Label1．Caption = File1．List End Sub
