在名称为Forml的窗体上添加一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,名称为Labell、标题为“文件名”的标签和名称为Label2、BorderStyle为l的标签。将窗体的标题设置为“文件

admin2020-04-08  24

问题 在名称为Forml的窗体上添加一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,名称为Labell、标题为“文件名”的标签和名称为Label2、BorderStyle为l的标签。将窗体的标题设置为“文件系统控件”,如图所示。请编写适当的程序,使得这三个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将在Label2中显示选中的文件名。
    注意:要求程序中不得使用变量,事件过程中只能写一条语句。
    存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。

选项

答案【操作步骤】 步骤I:新建一个窗体,按照题目要求建立驱动器列表框、目录列表框和文件列表框控件并设置其属性,如图4.28所示。 [*] 程序中用到的控件及属性见表4.39和表4.40。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Dirl_Change() Filel.Path=Dirl.Path’使目录列表框Dirl与文件列表框Filel同步 End Sub Private Sub Drivel ()_Change Dirl.Path=Drivel.Drive′使驱动列表框Drive 1与目录列表框Dirl同步 End Sub Private Sub Filel—C1ick() Label2=Filel.FileName′显示Filel中的文件名 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】在编写代码时,“l”(L)和1比较相似,注意不要混淆。

解析 在实际应用中,驱动器列表框、目录列表框和文件列表框通常需要同步操作,这可以通过Path属性的改变引发Change事件来实现。
转载请注明原文地址:https://jikaoti.com/ti/tEx0FFFM
0

随机试题
最新回复(0)