请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画一个名称为Drv1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,名称为Label1、标题为“文件名”的标签和名

admin2016-01-31  12

问题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1的窗体上画一个名称为Drv1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。窗体的标题设置为“文件系统控件”。请编写适当的程序,使得这三个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将选中的文件名显示在Label2中,如图3-27所示。
   
    注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为vbsj2.vbp,窗体文件名为vbsj2.frm。

选项

答案知识点播 驱动器列表框(Drive ListBox)用来显示当前系统中所有有效磁盘驱动器的列表:目录列表框(DirList Box)用来分层显示指定磁盘驱动器上的目录列表;文件列表框(FiIe List Box)用来显示指定目录中所选择文件类型的文件列表,默认为*.*。在程序运行时,驱动器列表框的Drive属性用来设置或返回选择的驱动器(缺省值是当前驱动器),目录列表框的Path属性用来设置或返回选择的目录(缺省值是当前路径),文件列表框的Path属性用来设置或返回其当前的目录(缺省值是当前路径),文件列表框的FileName属性可返回所选文件的文件名。 审题分析 要在程序运行时,能对系统中的文件进行浏览,就要让驱动器列表框、目录列表框和文件列表框实现同步变化,关键是将驱动器列表框、目录列表框、文件列表框相互关联起来,这可通过编写驱动器列表框、目录列表框的Change事件过程,使三者的路径保持一致来实现。 操作步骤 步骤1:新建“标准EXE”工程,往窗体Form1中加入驱动器列表框、目录列表框控件、文件列表框控件各一个以及两个标签,分别设置它们的相关属性,属性及其值如表4-17所示。 [*] 步骤2:打开代码编辑窗口,输入如下代码: 参考代码: PriVate Sub DrV1_Change() Dir1.Path=Drv1.Drive End Sub PriVate Sub Dirl_Change() Filel.Path=Dir1.Path End Sub Private Sub File1_Click() Label2.CaDtion=File1.FileName End Sub 步骤3:按要求将文件保存至考生文件夹中。 考点链接 文件系统控件。

解析
转载请注明原文地址:https://kaotiyun.com/show/mrLp777K
0

最新回复(0)