范文无忧网计划总结报告汇报

vfp编程:计算一个文本文件中的字符数并报告其中空格的个数

02月14日 编辑 fanwen51.com

[劲舞团昵称空格怎么打]劲舞团名字空格: 1、在一开始注册时千万不要填写游戏名字。 2、直接跳过注册那一项,之后把其他的资料填写完,然后直接提交。 3、重新登陆帐号,然后点到个人信息管理的那个界面。...+阅读

可以用ADIR()函数,比如文本文件在当前默认路径下,名叫 test.txt ADIR(arrayname,'test.txt') 在数组arrayname(1,2)中就是这个文件的大小,文本文件没有格式,文件大小就是字节数。****************************************** ADIR( ) 函数 将文件信息存放到数组中,然后返回文件个数。ADIR(ArrayName [, cFileSkeleton [, cAttribute [, nFlag]]]) 参数 ArrayName 指定数组名。如果数组不存在,Visual FoxPro 将自动创建此数组。

如果数组存在,但其大小不足以包含所有信息,则 Visual FoxPro 自动增加数组大小,使得数组能容纳所有信息。如果数组超过了所需大小,Visual FoxPro 将截掉多余部分。如果数组存在,并且 ADIR( ) 函数由于没找到匹配文件而返回 0,则数组保持不变。如果数组不存在,并且 ADIR( ) 函数返回零,则不创建数组。下表说明了数组中每列的内容及其数据类型: 列 数组内容 数据类型 1 文件名 字符型2 文件大小 数值型3 文件最后修改日期 日期型4 文件最后修改时间 字符型5 文件属性 字符型 数组的最后一列包含匹配文件的文件属性。

每个文件属性值由一个字母表示,一个文件可有多个属性。下表说明每个字母表示的文件属性含义: 字母 属性 A 档案文件 一 可读写 H 隐藏文件 R 只读文件 S 系统文件 D 目录或文件夹 cFileSkeleton 指定文件梗概,以便存储满足搜索条件的文件名或扩展名的文件信息。例如,条件可以是所有表、所有文本文件、所有文件名第一个字母为“A”的文件,等等。

这些通配查询在 cFileSkeleton 中可以包含通配符 * 和 ?。其中问号代表单个字符,星号代表任意字符串。在文件梗概中,可在任意位置使用任意个数的通配符。可以指定驱动器和目录名,程序将在此驱动器和目录下搜索匹配文件。如果不指定驱动器和目录名,将把当前目录下的文件信息存入数组中。 cAttribute 指定在返回内容中包含子目录或嵌套文件夹、隐藏或系统文件、或者卷名。

cAttribute 可以是 D、H 和 S 的任意组合。如果包含 D,除了返回匹配 cFileSkeleton 的文件名外,还将返回当前目录的子目录或当前文件夹的嵌套文件夹。如果包含 H,将返回与 cFileSkeleton 指定相匹配的隐藏文件信息。如果包含 S,将返回与 cFileSkeleton 指定通配文件名相匹配的系统文件信息。如果 cFileSkeleton 为空字符串,仅返回子目录或嵌套文件夹名、隐藏或系统文件。

cAttribute 参数中包含字符 V,将返回当前驱动器的卷名。如果 V 和 D、H 或 S 一起包含在数组中,则只返回卷名。卷名存入数组的第一个元素中,并截去数组的其余部分。 nFlag 指定是否显示规定的 DOS 文件名或实际区分大小写。 nFlag 说明 0 (默认) 以大写方式显示完整的路径名1 以原始的大小写方式2 按 DOS 8+3 命名约定 返回值 数值型 说明 对于每一个文件,ADIR() 将文件名、大小、日期、时间和属性信息存入数组。

示例 下面的示例使用 ADIR( ) 函数创建一个包含数据库信息的数组,然后显示这些数据库名。 复制代码 CLOSE DATABASES SET DEFAULT TO (HOME(2) + 'Data') gnDbcnumber = ADIR(gaDatabase, '*.DBC') & 创建一个数组 CLEAR FOR nCount = 1 TO gnDbcnumber & 遍历数据库 ? gaDatabase(nCount,1) & 显示数据库名 ENDFOR SET PATH TO HOME( ) & 设置路径到 Visual FoxPro 目录

延伸阅读:

写一份因扫地而早读迟到挨扣分的检讨书1000个字符号不算急急今天,我怀着愧疚和懊悔给您写下这份检讨书,以向您表示我对早读迟到这种不良行为的深刻认识以及再也不早读迟到的决心. 这是一次十分深刻的检查,我对于我这次犯的错误感到很惭愧...

SQL如何实践字符串拼接:--建表create table M( id int, dict varchar(10))Create Table N( billno int, dictdoc varchar(100))--插入数据insert into M values(1,'A')insert into M values(2,'B')i...

来篇深刻检讨600字符合初中生的好好学习,遵守校纪校规是我们每个学生应该做的,也是中华民族的优良传统美德,可是我作为当代的学生却没有好好的把它延续下来。就像很多中国青年都不知道有圣诞节,却隆重的去过圣...

这些怎么了1为什么在低版本的IE中输入西方字符或标点符号都会自1。因为低版本的IE中的文字编码缺少特殊字符的编码,也就是说你输入的特殊字符IE认不出来,所以就无法显示出来 2。首先在你的文件夹选项里将“隐藏受保护的操作系统文件”取消,...

推荐阅读
图文推荐
栏目列表