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

完成下列问题在名称为Form1的窗体上画一个名称为Drive1的驱动器列表框一个名称为Dir1的目录

在窗体上画一个驱动器列表框一个目录列表框和一个文件列表框其名称分别为Drive1Dir1和File1

Dirve1.Drive=Dir1.Path Dir1.Path=Drive1.Drive Dir1.Path=Filel.Path File1.Path=Dir1.Path

在窗体上画1个组合框名称为Cbl设置为简单组合框和1个命令按钮名称为C1标题为添加编写适当的事件过程

在窗体上画一个驱动器列表框一个目录列表框和一个文件列表框其名称分别为DrivelDirl和Filel

Dirvel.Drive=Dirl.Path Dirl.Path=Drivel.Drive Dirl.Path=Filel.Path Filel.Path=Dirl.Path

在窗体上画一个名称为Drivel的驱动器列表框一个名称为Dirl的目录列表框当改变当前驱动器时目录列

Drivel change Drive1_Click Dirl_Click Dirl_Change

在窗体上画一个列表框和一个文本框然后编写List1的双击事件过程过程代码如下a=Thisform.L

1245 456789 789456

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

x没有实际作用，因此可以将该语句写为：Call Shell(File1．FileName，1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名字通过File1．FileName指定 File1中显示的是当前驱动器、当前目录下的文件

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

x没有实际作用，因此可以将该语句写为：Call Shell(File．FileName，1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名字通过File1．FileName指定 File1中显示的是当前驱动器、当前目录下的文件

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

x没有实际作用，因此可以将该语句写为：Call Shell(FilFileName，1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名字通过File1．FileName指定 File1中显示的是当前驱动器、当前目录下的文件

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

x没有实际作用，因此可以将该语句写为：Call Shell(Filel. FileName, 1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名字通过Filel. FileName指定 Filel中显示的是当前驱动器、当前目录下的文件

在窗体上画一个名称为Drivel的驱动器列表框一个名称为Dirl的目录列表框当改变当前驱动器时目录列

Drivel_Change Drivel_Click Dirl_Click Dirl_Change

在窗体上拖拉出一个文本框名称为Txt1Text属性为空白再画一个列表框名称为Lst1通过属性窗口向

在窗体上画一个驱动器列表框一个目录列表框和一个文件列表框其名称分别为DrivelDirl和Filel

DirveDrive=DirPath DirPath=DriveDrive DirPath=FilePath FilePath=DirPath

在窗体上画一个名称为Drivel的驱动器列表框一个名称为Dirl的目录列表框当改变当前驱动器时目录列

Drivel change Drive1_Click Dirl_Click Dirl_Change

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

x没有实际作用，因此可以将该语句写为：Call Shell(File FileName, 1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名字通过File FileName指定 Filel中显示的是当前驱动器、当前目录下的文件

在窗体上拖拉出一个文本框名称为Txt1Text属性为空白再画一个列表框名称为Lst1通过属性窗口向

在窗体上画一个名称为Listl的列表框一个名称为Labell的标签列表框中显示若干城市的名称当单击列

Private Sub Listl_Click() LabelCapfion=ListListlndex End Sub PrivateSubLial click() LabelName=ListListlndex End Sub PrivateSubListl click() LabelName=ListText End Sub Private Sub Listl_Click() LabelCaption=ListText End Sub

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

x没有实际作用，因此可以将该语句写为：Call Shell(FileFileName,1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名字通过File1.FileName指定 Ffle1中显示的是当前驱动器、当前目录下的文件

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

x没有实际作用，因此可以将该语句写为：Call Shell(File1．FileName，1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名字通过File1．FileName指定 File1中显示的是当前驱动器、当前目录下的文件

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

x没有实际作用，因此可以将该语句写为：Call Shell(File. FileName，1) 双击文件列表框中的文件，将触发该事件过程要执行的文件的名称通过Filel. FileName指定 Filel中显示的是当前驱动器、当前目录下的文件

在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub FUel_DblClick（　） x=Shell(File1_ileName，1) End Sub 以下关...

包含此试题的试卷

你可能感兴趣的试题

热门试题

热门题库

在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub FUel_DblClick（ ） x=Shell(File1_ileName，1) End Sub 以下关...

包含此试题的试卷

你可能感兴趣的试题

热门试题

热门题库

在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub FUel_DblClick（　） x=Shell(File1_ileName，1) End Sub 以下关...