VB中驱动器列表框的介绍.ppt

上传人:本田雅阁 文档编号:2202912 上传时间:2019-03-03 格式:PPT 页数:28 大小:653.51KB
返回 下载 相关 举报
VB中驱动器列表框的介绍.ppt_第1页
第1页 / 共28页
VB中驱动器列表框的介绍.ppt_第2页
第2页 / 共28页
VB中驱动器列表框的介绍.ppt_第3页
第3页 / 共28页
亲,该文档总共28页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述

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

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

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

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

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

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

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

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

8、t-1,其中-n为根目录所对应的索引号。 如在上图中,Dir1.List(-1)表示当前目录“VB98”的路径“c:Program FilesMicrosoft Visual StudioVB98”;Dir1.List(-2)表示当前目录父目录的目录路径;Dir1.List(0)表示当前目录第一个子目录的目录路径;Dir1.List(Dir1.ListCount-1)表示当前目录最后一个子目录的目录路径;Dir1.List(Dir1.ListIndex)表示当前被选中表项所对应的目录路径。,目录列表器中单击表示选中,目录列表框的Path属性值表示的是被双击表项所对应的目录。 如果希望单击就能修

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

10、值表示系统中盘驱动器的个数。,三、利用组合框确定文件列表框显示的文件类型,(1)文件列表框的Pattern属性:该属性用以设置文件列表框中文件的显示模式,缺省值为“*.*”,表示显示所有类型的文件。此属性可以在属性窗口中设置,也可以在程序中通过赋值设置。 File1.Pattern=“*.exe”,使File1列表框中只显示所有扩展名为EXE的文件。 如果需要同时设置多个类型,用分号隔开 (2)组合框中要显示出表示文件类型的项目:属性窗口list (3)组合框的单击事件过程中,修改文件列表框的patten属性,文件列表框控件常用属性,(3) FileName属性。用以设置或返回所选文件的文件名

11、(并不包含路径信息),不能在属性窗口中设置,运行时若在文件列表框中选择文件将自动设置FileName属性值。 (4) ListCount属性。ListCount属性表示当前目录中的文件的数目,文件列表框控件常用属性,(5) ListIndex属性。ListIndex属性表示被选中文件的索引号。 (6) List属性。List字符串数组中的每一个元素都对应着文件列表框中的一个表项,都对应着一个具体的文件名。 注:file1.filename属性等价于file1.list(listindex)表示当前选中的图片 上一张图片: 下一张图片: 第一张索引号 最后一张索引号:,文件列表框控件常用事件,与

12、盘驱动器列表框、目录列表框不同的是:文件列表框支持PathChange和PatternChange事件,但不能响应Change事件。 (1) PathChange事件。当文件列表框的Path发生变化时,引发PathChange事件。 (2) PatternChange事件。当文件列表框的文件显示模式发生改变时,即Pattern属性值的改变将引发PatternChange事件。 (3) Click事件。当单击文件列表框中的表项时,引发Click事件。 (4) DblClick事件。当双击文件列表框中的表项时,引发DblClick事件。,四、单击文件列表框中的一个图片,在图象框中显示出图片,文件列

13、表框的单击事件过程,导入用户选中的图片到图象框中 用户选中图片的完整路径表示方法: 导入图片的语句 判断文件是否为图片文件,五、单击“下一张”按钮,显示下一张图片,下一张的索引号 图片完整路径的处理,六、另外一种表示导入文件的路径的方法,把驱动器列表框中选中的驱动器作为默认驱动器 把目录列表框中选中的目录作为默认目录 然后文件路径就直接采用file1.filename或file1.list(file1.listindex)就行了 ChDrive Drive1.Drive ChDir Dir1.Path If Right(File1.FileName, 3) = “jpg“ Or Right(F

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

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 其他


经营许可证编号:宁ICP备18001539号-1