当前位置：文档之家 › 第10章 文件

第10章 文件

  • 格式：ppt
  • 大小：208.00 KB
  • 文档页数：17

下载文档原格式

  / 17

合集下载

chap10(文件)

chap10(文件)

3、 reat 函数 Turbo C不允许用open函数建立新文件，而提 供一个 creat 函数用来建立新文件。调用格式： creat(文件名, 打开方式); 若建立成功，该函数返回一个正整数(文件号)，否则 返回–1。 4、 read 函数 调用格式： read(fd, buf, count); read函数的作用是从正整数fd代表的非缓冲文件中 读出count个字节的信息到buf指向的缓冲区中。读 出成功，read函数返回值为读出的字节数，遇文件 结束，read函数返回值为0，否则为–1。
fseek(fp,100L,0); fseek(fp,50L,1); fseek(fd,–10L,1);
/* 将指针移到离文件头100个字节处 */ /* 将指针移到离当前位置50个字节处*/ /* 将指针从当前位置倒退10个字节 */
fseek(fp,–10L,2);
/* 将指针移到文件末倒数10个字节处*/
文件的打开模式
r 以只读方式打开一个文本文件 w 以只写方式打开一个文本文件 a 以追加方式打开一个文本文件 r+ 以读/写方式打开一个文本文件
w+ 以读/写方式建立一个新的文本文件 a+ 以读/写方式打开一个文本文件
rb 以只读方式打开一个二进制文件 wb 以只写方式打开一个二进制文件 ab 以追加方式打开一个二进制文件 rb+ 以读/写方式打开一个二进制文件 wb+ 以读/写方式建立一个新的二进制文件 ab+ 以读/写方式打开一个二进制文件
二、 文件类型指针 “文件指针”是缓冲文件系统中的一个重要概念。 在C系统的头文件stdio.h中定义了一个名叫FILE(注意 大写!)的结构体类型(其成员反映了对文件进行输入/输 出操作时的有关信息): typedef struct { short level; /* 缓冲区饱和程度 */ unsigned flage; /* 文件状态标志 */ char fd; /* 文件号 */ unsigned char hold; /* 无缓冲区取消字符输入 */ short bsize; /* 缓冲区大小, 缺省值512 */ unsigned char *buffer; /* 缓冲区 */ unsigned char *curp; /* 当前活动指针 */ unsigned istemp; /* 草稿文件标识 */ short token; /* 作正确性检验 */ }FILE ;

第10章 旅游法规

第10章 旅游法规

2）漂流旅游安全管理
第10章 旅游安全法规
10.3.2 旅游管理部门的职责
1）省级旅游管理部门的职责 2）地方旅游行政管理部门的职责 3）经营漂流旅游企业的职责 4）漂流工具操作人员的职责
第10章 旅游安全法规
10.4 旅游饭店安全管理
10.4.1 旅游饭店安全管理的任务
1）旅游饭店安全管理的方针
第10章 旅游安全法规
10.2.3 奖励与惩罚
1）奖励
(1) 对单位的表扬和奖励条件 （2）对个人的表扬和奖励条件
2）惩罚
(1) 对违反有关安全法规而造成旅游者伤亡事故和不履行本办 法的，由旅游行政管理部门会同有关部门分别给予直接责 任人和责任单位以下处罚。 (2) 对在旅游安全管理工作中有下列情形之一者,由各级旅游行 政管理部门检查核实，对当事人或当事单位负责人给予批 评或以下处罚。
第10章 旅游安全法规
10.2.2 事故处理程序
1）旅游安全事故处理的一般程序
（1）现场有关人员和陪同人员应当立即向本单位和当地旅游行政管 理部门报告，主管部门应当及时报告归口管理部门 （2）会同事故发生地的有关单位严格保护现场 （3）协同有关部门进行抢救、侦查 （4）有关单位负责人应及时赶赴现场处理
1）景区主要负责人职责 2）旅游景区安全管理机构的主要职责
10.7.3 旅游景区安全管理重点
1）旅游景区游览安全管理制度的建立 2）加强安全信息发布 3）加强重要环节管理，建立规章制度
第10章 旅游安全法规
【本章小结】 本章小结】
本章介绍了旅游安全管理工作的方针、原则，旅游相关部门各 自的职责。对旅游活动中出现的安全事故，国家规定了一整套处 理的程序。此外还介绍了漂流旅游、旅游酒店等安全管理方面的 内容。随着旅游业的发展，旅游安全管理已经成为影响旅游业发 展和旅游者利益的一个重要因素，学习和了解有关旅游安全管理 师必要的，运用这些知识，可以保障旅游者安全和提高安全意识。

第10章 数据文件

第10章 数据文件

3.设置控件属性
4.编写程序代码
a.代码分析 课堂任务“摇奖程序”程序代码设计较为简单，要求通过 DriveListBox控件、DirListBox控件和FileListBox实现对盘符、 文件夹和文件的选择，最终实现文件的数据的输入，单击 “摇奖”按钮，程序将从数据输入文件中开始抽取摇奖数据， 并不断显示所抽取的摇奖数据，单击“停止”，程序将在 Textbox控件的文本框内显示摇奖结果。程序代码段应包含 摇奖按钮事件、停止按钮事件、窗体加载事件、盘符改变事 件、时间控制事件和目录改变事件
5.归纳与提高 一般情况下，驱动器列表框控件DriveListBox、目录列表 框控件DirListBox与文件列表框控件FileListBox三种控件经常 一起工作。而要使这三个控件协同工作也很简单，用户只要 为驱动器列表框的Change事件建立一个过程，当用户选择新 的驱动器时就会执行这个事件过程，这个过程将改变目录列 表框的路径以符合新选择的驱动器；同时，用户再为目录列 表框的Change事件建立一个过程，当用户选择新的目录时激 发该事件，并改变文件列表框以符合新的目录路径。通过上 述的两个过程，三个控件就可以同步工作了。
‘停止
‘窗体加载 ‘计时器停止
‘盘符的改变事件发生时 ‘更改相应目录wjj的路径
‘产生1到cc间的随机数 ‘text1中显示number(i)的内容
‘更改文件列表wj的路径
5.课后练习：
练习1：
在理解掌握本课课业设计的基础上，独立完成“摇奖程序”。

b.具体代码分析
‘通用声明处定义的变量，在每个过程中都有效 Dim Cc As Integer ‘设置参加摇奖的人数变量cc ‘设置用于保存参加摇奖的各人的资料(比如姓名或号码 )的数组变量 Dim Number(100) As String ‘摇奖按钮事件 Private Sub Command1_Click() FileName = wj.Path & "\" & wj.FileName ‘变量FileName中得到包含输入 数据的文件名 ‘打开文件FileName，文件的内容通过1号输入缓冲区输入 Open FileName For Input As #1 For i = 1 To 100 ‘从1号缓冲区中输入文件中的第i行至变量number(i)中 Line Input #1, Number(i) If EOF(1) Then Exit For ‘若文件结束,则退出循环 Next Close ‘关闭文件 Cc = i ‘参加摇奖的总数为cc Timer1.Enabled = True ‘开始摇奖 End Sub

第10章-职业安全健康管理体系

第10章-职业安全健康管理体系

第十章职业安全健康管理体系第一节概述安全是人类发展所需的基本条件，科学技术发展到今天，随着世界经济一体化进程的加速，与生产过程密切相关的职业健康与安全问题受到国际社会的普遍关注，80年代末，一些发达国家率先开展研究及实施职业健康与安全管理体系标准化问题,并在制定相关的经济政策和立法方面更趋于关注职业健康与安全问题。

在我国，职业安全健康管理体系标准化工作已开展了几年并积累了一定的经验，随着国际职业安全健康管理体系标准化的进一步发展，国家经贸委在1９99年10月正式颁布了《职业安全健康管理体系试行标准》，并决定在企业开展职业安全健康管理体系的认证工作。

由此我国职业安全健康管理也进入了一个新的发展时期。

一、职业安全健康管理体系出台的背景及模式80年代以来,国际标准化组织相继颁布了质量管理体系标准（ISO9000）以及环保管理体系标准（ISO1４00１）并在世界范围内得到了成功实施,有力地促进了国际职业安全健康管理体系标准化的发展。

特别是近几年，职业安全健康管理体系标准化在国际区域范围内发展也更为迅速,亚太地区职业安全健康组织(APＯSHO）在1998年第14届年会上建议各成员组织参照IＳＯ1400和ＡPOＳＨO1000开发本国的标准。

19９９年3月，由全球数家最知名的标准制度研究、认证机构（如ＢSI、ＳGS、BVQⅠ、ＤNV、NSAⅠ、ＡＳ/ＮＺ、UNE、LRQA、SABS等)共同颁布了职业健康与安全ＯSＨASⅠ800１标准。

面对职业安全健康管理体系标准化的国际发展趋势,只有积极参与国际标准化的潮流，才能争取主动。

并且，我国实施职业安全健康管理体系标准化也具备了相当的基础条件,即:已初步健全了职业安全健康管理体系和法律、法规体系;ISO9000和ISＯ14001在我国的成功实施,为企业实施安全健康管理体系提供了经验性的保障条件。

我国作为国际标准化组织的正式成员国，在职业安全健康管理体系标准化问题刚提出时就十分重视，并于１995年派代表参加了职业安全健康管理体系标准化的特别工作组；1９98年8月，中国劳动保护科学技术协会提出职业安全健康管理体系试行标准,对企业进行试点实施；1９99年10月，国家经贸委正式颁布了《职业安全健康管理体系试行标准》,并下发了关于开展职业安全健康管理体系的认证工作的通知.截止2000年7月，已有19家企业顺利通过职业安全健康管理体系的认证。

传感器与检测技术 第十章 智能传感技术教程文件

传感器与检测技术 第十章 智能传感技术教程文件
9
第10章 智能传感技术
(四)自补偿、自检验及自诊断 智能传感器系统通过自补偿技术可以改善其动态 特性，但在不能进行完善实时自校准的情况下，可以采 用补偿法消除因工作条件、环境参数发生变化后引起系 统特性的漂移，如零点漂移、灵敏度漂移等。同时，智 能传感器系统能够根据工作条件的变化，自动选择改换 量程，定期进行自检验、自寻故障及自行诊断等多项措 施保证系统可靠地工作。
15
第10章 智能传感技术
(2)周期性自检 若仅在开机时进行一次性的自检，而自检项目又不 能包括系统的所有关键部位，那就难以保证运行过程中 智能传感器始终处于最优工作状态。因此，大部分智能 传感器都在运行过程中周期性地插入自检操作，称作周 期性自检。在这种自检中，若自检项目较多，一般应把 检查程序编号，并设置标志和建立自检程序指针表，以 此寻找子程序入口。周期性自检完全是自动的，在测控 的间歇期间进行，不干扰传感器的正常工作。除非检查 到故障，周期性自检并不为操作者所觉察。
图10-3 集成智能传感器结构示意图
2
第10章 智能传感技术
(三)混合实现 将系统各个集成化环节，如敏感单元、信号调理电 路、微处理器单元、数字总线接口，以不同的组合方式 集成在两块或三块芯片上，并装在一个外壳里。
图10-4 智能传感器的混合集成实现结构
3
第10章 智能传感技术
二、智能传感器功能的实现
16
第10章 智能传感技术
(3)键控自检 键控自检是需要人工干预的检测手段。对那些不能 在正常运行操作中进行的自检项目，可通过操作面板上 的“自检按键”，由操作人员干预，启动自检程序。例 如，对智能传感器插件板上接口电路工作正常与否的自 检，往往通过附加一些辅助电路，并采用键控方式进行。 该种自检方式简单方便，人们不难在测控过程中找到一 个适当的机会执行自检操作，且不干扰系统的正常工作。 智能传感器内部的微处理器，具有强大的逻辑判断 能力和运行功能，通过技术人员灵活的编程，可以方便 地实现各种自检项目。

第10章 中外渔业关系和渔业协定

第10章 中外渔业关系和渔业协定

暂，约占东
海渔场总面积的30％。不适用于双方EEZ制度， 也不适用于前述双方互惠入渔的有关规定，而 适用协定规定的暂定措施。
中间水域
中间水域管理措施：
（1）维持现有渔业活动； （2）双方渔船均无须领取对方许可证； （3）双方将以对本国渔船采取必要的船数限制、 交换渔获量资料等方式，致力于确保海洋生物 资源不受过度开发的危害； （4）中间水域两侧分别为中日管辖水域。
过渡水域
在过渡期内，按以下规定管理： 双方各自管辖本国国民和渔船，不对另一方渔
民或渔船进行管理； 双方逐年减少进入对方“过渡水域”的渔业活 动； 双方各自向另一方“过渡水域”的本国渔船发 放捕鱼许可证，并相互交换渔船名册； 采取和“暂定措施水域”相同的生物资源养护 和管理措施；还可采取联合检查措施，包括联 合乘船巡逻、勒令停船、登临检查等。
第十章 中外渔业关系和渔业协定
内容： 一 中日渔业协定和渔业安全作业议定 书 二 中韩渔业协定和渔业安全作业议定 书 三 中越北部湾渔业合作协定
第一节 中日渔业协定和渔业安全作业议定书
1955年6月13日：第一次签定中日民间渔业


协定。 1958年～1963年，中日民间渔业协定停滞。 1963年11月9日：第二次签定中日民间渔业 协定。 1955年到1974年，中日双方共签定或延长民 间协定有效期12次。 1975年8月15日，在东京签定《中华人民共 和国和日本国渔业协定》，1975年12月23日 生效。建立中日渔业联合委员会。 1975年9月22日在北京签定《海上安全作业 议定书》。
中韩渔业协定的主要内容
（1）协定的适用水域为中韩双方的专属经济区。 （2）根据互惠原则，双方均准许另一国的国民及 渔船到本国的专属经济区从事渔业活动； （3）确立“暂定措施水域”； （4）在“暂定措施水域”两侧设立“过渡水域”， “过渡水域”的过渡期为4年；期满后，分别按 各自EEZ制度管理。 （5）在北纬37度以北水域，以及“暂定措施水 域”和“过渡水域”以南的部分水域，维持现 有渔业活动，双方各自对己方国民和渔船进行 管理。 （6）海难及其他紧急事故上的互相救助和保护， 由于天气恶劣或其他紧急事态下允许对方到本

应用文写作第10章 公文修改及病例分析


第二节 公文常见病例分析
一、公文标题常见病例分析
（一）要素不全。 完整的、规范的公文标题一般应具备
“三要素”，即发文机关名称、事由、文种， 以标明由谁发文、为什么发文和用什么文种发 文。特殊情况下，也可省略标题中的一至二个 要素，但不可随意省略，要相对规范，否则， 将毛病百出。
常见的病例有三种：
（“进展”改为“解决”。）
2．残缺和多余 （1）成分残缺
从大量的观测实事中告诉我们，要掌握天气的变 化，最好是每小时进行观测。（主语残缺，去掉“从” 和“中”。）
这些杂交高粱由于产量高，而且比外国进口的杂 交高粱更高的抵抗病虫害的能力，受到了当地农民的 欢迎，推广面积越来越大。”
（谓语残缺，应在“而且”后面加上“有”，“更高”改 为“更强”。）
中共××县委××县人民政府 关于进一步整治和改善经济发展环境的
实施意见
二是排列布局不规范。 有的左右摆布不居中，不是偏左，就是偏右；有的标题第一行与 “红色反线”距离不是相间过大，就是过小；有的标题中行与行 之间相离不是过旷，就是过紧。规范的摆布应是： 红色反线下空2行开始排列标题的第一行，行与行之间相间“以2 号字高度加2号字高度7／8倍的距离”；左右摆布时，要居中。 居中排列并不难做到，使用电造文种。如《关于调整工资的 补充说明》、《关于机构改革中有关问题的 解释》等，这里的“补充说明”、“解释” 均不应作为文种使用，以上两个标题可修定 为《××（发文机关）关于印发调整工资补 充说明的通知》、《××（发文机关）关于 印发机构改革中有关问题解释的通知》。
（三）隶属不清。 不该用“批转”的，用了批转；该用“批转”的
第十章 公文修改及病例分析
公文修改 公文常见病例分析
第一节 公文修改

第10章利用文件保存数据(1)


第10章 利用Biblioteka 件保存数据一txt般、1不d0a超t.、1过.c32、个文c字pp母件、（名odboj、c、P276
➢文件路ex径e、表p示pt文、件bm在p外等部）存储设备中的位
置。如：
d: \cc\temp\file1.dat 表示file1.dat文件存放在d盘中的cc目录下
的temp子目录下面
➢输入操作时，数据从文件流向计算机内存 ➢输出操作时，数据从计算机流向文件
C语言程序设计
第10章 利用文件保存数
据
10.1.1 什么是文件 P275
➢Ｃ语言把文件看作是一个字符（或字节） 的序列。一个输入输出流就是一个字符流 或字节(内容为二进制数据)流。
C语言程序设计
第10章 利用文件保存数
据
C语言程序设计
第10章 利用文件保存数
据
10.1.1 什么是文件 P275
➢文件有不同的类型，在程序设计中，主要 用到两种文件：
(1) 程序文件。包括源程序文件(后缀为.c)、 目标文件(后缀为.obj)、可执行文件(后缀为 .exe)等。这种文件的内容是程序代码。
C语言程序设计
第10章 利用文件保存数
C语言程序设计
第10章 利用文件保存数
据
10.1.1 什么是文件 P275
➢在以前各章中所处理的数据的输入和输出 ，从终端的键盘输入数据，运行结果输出 到终端显示器上
➢常常需要将一些数据输出到磁盘上保存起 来，以后使用
➢这就要用到磁盘文件
C语言程序设计
第10章 利用文件保存数
据
10.1.1 什么是文件 P275
C语言程序设计
第10章 利用文件保存数
据

kj第10章 文件编程技巧分析


第10章
文件知识编程技巧分析
第‹#›页
几种使用文件的方式如下： r：以只读方式打开一个文本文件。文件必须存在，否则打 开失败。打开后，文件内部的位置指针指向文件首部的第一个字 符。 w：以只写方式打开一个文本文件。若文件不存在，则建立 该文件。若文件已存在，则删除原文件内容，写入新内容。 a：以追加方式打开一个文本文件。只能向文件尾追加数据。 文件必须存在，否则打开失败。打开后，文件内部的位置指针指 向文件尾。 r+：以读/写方式打开一个文本文件。文件必须存在。打开后， 文件内部的位置指针指向文件首部的第一个字符。打开后，可以 读取文本内容，也可以写入文本内容，也可以既读又写。 w+：以读/写方式打开或新建立一个文本文件。若文件已存 在，则新的写操作将覆盖原来的数据。若文件不存在，则建立一 个新文件。还可以在不关闭文件的情况下，再读取文件内容。 a+：以读和追加的方式打开一个文本文件。允许读或追加。 文件必须存在，否则打开失败。打开后，文件内部的位置指针指 向文件尾。可在文件尾追加数据，也可将位置指针移到某个位置， 读取文件内容。
第10章 文件知识编程技巧分析 第‹#›页
10.1 文件知识简要介绍
3 、检测文件位置指针是否到达文件尾 可以使用feof函数检测文件位置指针是否到达文件尾，使 用格式如下： feof(文件类型指针); 若到达文件尾，则feof函数返回一个非0值(真)，否则返回 0(假)。 当我们对文件进行操作时，例如顺序读取文件的所有数据， 可以使用该函数来判断文件内容是否结束，若文件内容没有结 束，则继续读取数据，否则结束读取操作。 4、 检测文件位置指针的当前位置 可以使用ftell函数检测文件的位置指针的当前位置，使用格 式如下： 长整型变量=ftell(文件类型指针); 若调用ftell函数成功，ftell函数的返回值是从文件首到位置 指针所指当前位置的总的字节数(长整型)，否则返回值是-1L。

高树芳C语言程序设计--第十章


[解决方案]定义结构体类型变量存储学生信息，
使用scanf从键盘输入数据，使用fprintf函数按格 式输出数据到文件（生成data3.txt文件）。
程序代码
10
10.2
文件的读写
相关知识：
1．文件的读写 2．格式化读写函数
11
10.2
文件的读写
[课堂训练10-1] 1．使用Windows的记事本建立一个文件，其 中写入15个任意整数，数据之间用逗号分隔。 编程输出该文件所有的奇数。 2．编程以只读方式打开案例10-3中的 data3.txt文件，在屏幕上输出所有学生的数 据。
第10章
文件
知识目标： 1. 理解文件和文件指针的概念 2．掌握文件的打开和关闭方法 3．掌握文件的读写操作 4．掌握文件的定位与随机读写操作
1
第10章 文件 能力目标： 1. 会打开和关闭文件 2．会对文件进行读写和定位等操作
本章内容： 文件的定义，文件型指针，文件的打开与关闭，文件 的读写，文件的定位与随机读写。
2
第10章 10.1 10.2 10.3 10.4
文件
文件的打开与关闭 文件的读写 文件的定位和随机读写 知识拓展
3
10.1 文件的打开与关闭
案例10-1
输出文件中的整数及其和
4
10.1 文件的打开与关闭
案例10-1 [案例任务]
输出文件中的整数及其和
使用Windows的记事本在磁盘上与C程序文件在同一目 录下建立一个文件名为“data1.txt”的文本文件(如 图10-1所示)，以空格、制表符或回车为分隔符输入 任意个整数,设计C程序，以只读方式打开此文件，若 该文件不存在，则输出“不能打开文件！”，若打开 成功，则输出所有整数，以及整数的个数和它们之和。
  1. 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

结束
Private Sub File1_DblClick() f1 = Shell(text1.text, 1) End Sub Private Sub Form_Load() Combo1.AddItem "*.exe" Combo1.AddItem "*.com" Combo1.AddItem "*.bat" Combo1.Text = Combo1.List(0) Combo1_Click End Sub
结束
说明： 说明：
当驱动器列表框中改变驱动器时，就会触发 Change事件，执行Drive1_Change过程，在 过程执行时就把刚选定的驱动器目录结构赋 给目录列表框Dir1的Path属性，因此在目录 列表框就“同步”显示选定的驱动器的目录 结构。 同理，当目录列表框中改变文件夹位置也会 触发Change事件，执行Dir1_Change过程， 在过程执行时就把刚选定的文件夹的路径属 性（Dir1.Path)赋给文件列表框File1的 Path属性，从而达到“同步”。
结束
2.目录列表框 2.目录列表框 用于显示当前磁盘驱动器下的目录。 最重要的属性Path（路径）属性，用来设 置和返回当前的路径。不能在设计状态时 设置。 格式： [对象.]Path[=pathName] 对象.]Path[=pathName] 其中，对象是指目录列表框名。pathName 是一个路径名字符串。 每次Path属性的改变都会引发Change事件。
结束
③FileName属性 FileName属性 FileName 用来在程序运行时设置或返回所选中的文 件名。 格式： 对象.]FileName[=pathName] [对象.]FileName[=pathName] 其中，对象是文件列表框名，pathName是 一个指定文件名及其路径的字符串。
Visual basic
程序设计
第十章 文件
第十章
文件
10.1
文件系统控件
10.5
文件操作控 件、文件基本操作等知识。
结束
10.1 文件系统控件
VB提供了3种文件系统控件： 驱动器列表框（DriveListBox） 目录列表框（DirListBox） 文件列表框（FileListBox） 利用文件系统控件可以设计出用户所喜爱 的、具有不同风格的对话框，利用它们进 行文件管理十分方便。
结束
可以通过编写代码把驱动器列表框、目录 列表框和文件列表框结合起来用，使它们 “同步”。 代码如下： Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub Private Sub dirlist1_Change() File1.Path = Dir1.Path End Sub
结束
结束
文件操作控件
目录列表框 驱动器列表框 文件列表框
目录列表框控件
文件列表框控件
驱动器列表框控件
结束
1. 驱动器列表框 最重要的属性是Drive属性，用来设置当前 驱动器。 该属性不能在设计阶段使用此属性，必须 在程序中设置或引用。 格式： [对象.]drive[=drive] 对象.]drive[=drive] 其中，对象是驱动器列表框的名字。
结束
例： 设计一个“打开可执行文件”管理界面
结束
控件属性设置
对 象 属 性 设 置 Caption BorderStyle MaxButton MinButton Caption Caption Caption Caption Caption Text Caption Caption 打开可执行文件 1-Fixed Single False False 驱动器列表： 驱动器列表： 文件夹列表： 文件夹列表： 文件列表： 文件列表： 文件名： 文件名： 文件类型： 文件类型： 空白 确定 取消
结束
Form1 Label1 Label2 Label3 Label4 Label5 Text1 Command1 Command2
其他控件属性均使用默认值
程序代码如下： 程序代码如下： Private Sub Combo1_Click() File1.Pattern = Combo1.Text End Sub Private Sub Command1_Click() File1_DblClick End Sub Private Sub Command2_Click() Unload Me End Sub
结束
3.文件列表框 3.文件列表框 文件列表框列出在当前目录下的文件名 文件列表框有3个重要的常用属性： Path，Pattern和FileName ①Path属性 Path属性 Path属性用来指定当前路径，缺省值为系统 的当前路径。 ②Pattern属性 Pattern属性 Pattern属性用来指定在文件列表框显示的文 件类型，它的缺省值为“*.*”，即显示所有文 件的名字。
结束
Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub
结束
Private Sub File1_Click() If Len(Dir1.Path) > 3 Then Text1.Text = Dir1.Path & "\" & File1.filename Else Text1.Text = Dir1.Path & File1.filename End If End Sub