VB中驱动器列表框的介绍

上传人:宝路 文档编号:47622386 上传时间:2018-07-03 格式:PPT 页数:28 大小:654.15KB
返回 下载 相关 举报
VB中驱动器列表框的介绍_第1页
第1页 / 共28页
VB中驱动器列表框的介绍_第2页
第2页 / 共28页
VB中驱动器列表框的介绍_第3页
第3页 / 共28页
VB中驱动器列表框的介绍_第4页
第4页 / 共28页
VB中驱动器列表框的介绍_第5页
第5页 / 共28页
点击查看更多>>
资源描述

《VB中驱动器列表框的介绍》由会员分享,可在线阅读,更多相关《VB中驱动器列表框的介绍(28页珍藏版)》请在金锄头文库上搜索。

1、驱动器列表框DriveListBox驱动器列表框控件用于显示驱动器列表,工具箱中该控件图标为 。该控件缺省的名称为:Drive1、Drive2、目录列表框控件DirListBox目录列表框控件在工具箱中的图标为 。目录列表框控件用于显示当前驱动器中文件夹(目录)列表,如右图所示,其中“VB98”为当前目录。目录列表框控件缺省的控件名称为:Dir1、Dir2、 文件列表框控件FileListBox文件列表框控件用于显示当前目录中的文件列表,该控件图标为 。文件列表框控件缺省的控件名称为:File1、File2、这三个控件都是列表框,所有它们的很多属性都跟列表框相同。比如驱动器列表框中的每一个盘符

2、就是它的一个项目,保存在驱动器列表框的list数组中;驱动器列表框的listcount属性表示盘符的个数。实例一、界面设计二、如何使驱动器列表框、目录列表框、文件列表 框保持同步驱动器中的当前驱动器发生改变目录列表框中显示的目录就要跟着改变目录列表框中的当前目录发生改变文件列表框中显示对应文件夹中的文件关键是要知道这三个控件分别用什么属性来表示当前的项目当当前驱动器、当前目录发生改变时,会触发哪些事件驱动器列表框的Drive属性Drive属性(字符串类型)。用来设置当前驱动器或返回所选择的驱动器名。Drive属性只能在程序运行时赋值,而不能通过属性窗口设置。 设置默认驱动器.Drive= “驱

3、动器名”字符串的第一个字符是有效字符(不区别大小写),语句Drive1.Drive=“CDE“和Drive1.Drive=“c:“作用相同,都是把当前驱动器设置为c:盘。 程序运行时,若选择驱动器,则Drive属性值自动设置为所选择的驱动器名。如单击驱动器列表框控件Drive1中D:盘图标,则Drive1.Drive的值为“d:“。 目录列表框的Path属性Path属性。Path属性返回或设置目录列表框的当前目录。 程序运行时,双击目录列表框的某一个表项,目录列表框的Path属性值被自动设置为被双击表项所对应的目录。 如果双击盘x的根目录,则Path属性为“x:”;如果双击盘x的某一个子目录y

4、(文件夹),则Path属性为“x:y”。文件列表框的Path属性Path属性。该属性同目录路径列表框的Path属性一样,用以设置和返回当前文件列表框内所显示文件的路径。仅在运行时读写,不能在属性窗口中设置。 文件列表框总是显示Path所指示的文件夹中的文件。如果程序一运行,这些列表框就要显示默认的项目,可以在Form_Load事件中写入语句设置这三个属性的初值,例如File1.Path=“C:Windows”,窗体装入后File1显示文件夹C:Windows中的文件列表。 三个列表框的初始状态驱动器C: 目录C:Windows 件C:Windows Drive、Path属性都是不能直接在属性窗

5、口设置只能在Form_Load事件过程中通过赋值语句来实现同步的实现驱动器中选中的drive属性发生改变目录列表框中显示的目录就要跟着改变 驱动器的change事件中,把目录列表框中的当前目录设置成跟驱动器列表框的当前驱动器一致目录列表框中的path属性发生改变文件列表框中显示对应文件夹中的文件 目录列表框的change事件。目录列表框控件常用事件(1) Change事件。当目录列表框的Path属性值发生改变时,引发Change事件。 运行时双击目录列表框的表项,Path属性值自动设置为被双击的目录路径,并引发Change事件。(2) Click事件。单击目录列表框控件Dir1的某一表项时,引

6、发Click事件。被单击的表项被突出显示,ListIndex的值发生改变,但Dir1.Path属性没有改变,可以在事件过程Dir1_Click中写入语句“Dir1.Path = Dir1.List(Dir1.ListIndex)”,则可以在选择表项的同时改变Dir1.Path属性为被选表项所对应的路径。 目录列表框控件常用属性(1) ListCount属性。ListCount属性表示当前目录的一级子目录的数量,而不表示目录列表框中表项的个数。(2) ListIndex属性。ListIndex属性表示被选中表项的索引号。目录列表框表项的索引号遵循以下规则:当前目录所对 应的索引号为-1,当前目录

7、的父目录所对应的索引号为- 2,当前目录父目录的父目录所对应的索引号为-3,依此 类推;当前目录的第1个子目录所对应的索引号为0,第2 个子目录所对应的索引号为1,当前目录的最后一个 子目录所对应的索引号为ListCount-1。 因此,ListIndex属性取值范围为-nListCount-1,其中 -n为根目录所对应的索引号。目录列表框控件常用属性(4) List属性。List字符串数组中的每一个元素都对应着目录列表框中的一个表项,都对应着一个具体的目录路径。该数组由系统自动生成,数组List的下标取值范围为-nListCount-1,其中-n为根目录所对应的索引号。 如在上图中,Dir1

8、.List(-1)表示当前目录“VB98”的路径“c:Program FilesMicrosoft Visual StudioVB98”;Dir1.List(-2)表示当前目录父目录的目录路径;Dir1.List(0)表示当前目录第一个子目录的目录路径;Dir1.List(Dir1.ListCount-1)表示当前目录最后一个子目录的目录路径;Dir1.List(Dir1.ListIndex)表示当前被选中表项所对应的目录路径。目录列表器中单击表示选中目录列表框的Path属性值表示的是被双击表项所对应的目录。如果希望单击就能修改path属性值,可以在目录列表框的单击Click事件过程中修改pa

9、th属性的值,令其等于用户单击的表项运行时单击目录列表框中某一文件夹(目录)图标时,该目录被突出显示,表示被选中。选中目录改变目录列表框的ListIndex属性,但并不改变Path属性,若要改变Path属性值为所选中的目录路径,应当执行语句:.Path=.List(.ListIndex)驱动器列表框的常用属性 (2) List属性(字符串数组)。List数组的每一个元素都是盘驱动器列表框控件的一个列表项,为1个驱动器名,数组下标从0ListCount-1。 (3) ListCount属性(正整数)。ListCount属性值表示系统中盘驱动器的个数。三、利用组合框确定文件列表框显示的文件类型(1

10、)文件列表框的Pattern属性:该属性用以设置文件列表框中文件的显示模式,缺省值为“*.*”,表示显示所有类型的文件。此属性可以在属性窗口中设置,也可以在程序中通过赋值设置。 File1.Pattern=“*.exe”,使File1列表框中只显示所有扩展名为EXE的文件。 如果需要同时设置多个类型,用分号隔开(2)组合框中要显示出表示文件类型的项目:属性窗口list(3)组合框的单击事件过程中,修改文件列表框的patten属性文件列表框控件常用属性(3) FileName属性。用以设置或返回所选文件的文件名(并不包含路径信息),不能在属性窗口中设置,运行时若在文件列表框中选择文件将自动设置F

11、ileName属性值。(4) ListCount属性。ListCount属性表示当前目录中的文件的数目文件列表框控件常用属性(5) ListIndex属性。ListIndex属性表示被选中文件的索引号。(6) List属性。List字符串数组中的每一个元素都对应着文件列表框中的一个表项,都对应着一个具体的文件名。注:file1.filename属性等价于file1.list(listindex)表示当前选中的图片上一张图片:下一张图片:第一张索引号最后一张索引号:文件列表框控件常用事件与盘驱动器列表框、目录列表框不同的是:文件列表框支持PathChange和PatternChange事件,但不

12、能响应Change事件。q (1) PathChange事件。当文件列表框的Path发生变化时,引发PathChange事件。q (2) PatternChange事件。当文件列表框的文件显示模式发生改变时,即Pattern属性值的改变将引发PatternChange事件。q (3) Click事件。当单击文件列表框中的表项时,引发Click事件。q (4) DblClick事件。当双击文件列表框中的表项时,引发DblClick事件。四、单击文件列表框中的一个图片,在图象框中显 示出图片文件列表框的单击事件过程,导入用户选中的图片到图象框中用户选中图片的完整路径表示方法:导入图片的语句判断文件

13、是否为图片文件五、单击“下一张”按钮,显示下一张图片下一张的索引号图片完整路径的处理六、另外一种表示导入文件的路径的方法把驱动器列表框中选中的驱动器作为默认驱动器把目录列表框中选中的目录作为默认目录然后文件路径就直接采用file1.filename或file1.list(file1.listindex)就行了ChDrive Drive1.DriveChDir Dir1.PathIf Right(File1.FileName, 3) = “jpg“ Or Right(File1.FileName, 3) = “JPG“ ThenImage1.Picture = LoadPicture(File1

14、.FileName)End If自动播放Timer1的intervalTimer1的enable初始化为falseTimer事件过程播放下一张图片“自动播放”按钮的单击事件过程timer1的enable设置为true单击其他按钮时,自动播放应停止,所以“上一页”“下一页”、file1的单击事件过程中,应把timer1的enable设置为false文件操作添加控件驱动器列表框Drive2,目录列表框Dir2,文件列表框File2并保持这三个文件系统控件的同步复制文件要复制的源文件目标位置复制产生的文件的名称复制文件复制之前要判断用户是否有选中文件更新文件列表重命名文件要重命名的文件对话框输入新文件名文件的新的完整名称重命名更新删除文件弹出对话框真的要删除文件吗

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 中学教育 > 教学课件

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号