文件编辑
《1》自定义变量:自定义类
语法: 默认自定义类型是在标准模块内的,如果在窗体模块中,可以加上修饰符private定义
type 自定义类型名称
元素名称1 as 类型名
元素名称2 as 类型名
元素名称3 as 类型名
数组也行4 as类型名
end type
声明
dim 变量名或者数组名 as 自定义类型名称注意:不能当做全局变量,可以当作局部变量和窗体变量
使用
变量名.原素名
赋值
with 自定义类型名称
.元素名称1=值
.元素名称2=值
。。。。。。。
end with《2》语句
打开
open
顺序文件:
open 文件名 for 模式 as #文件号
模式:input:读入内存,前提是必须已经存在的文件
output:写入硬盘,
append:增加数据,到文件尾部
文件号:1到511,内存中的地址
随机文件:
open 文件名 for random as #文件号 len=len(数据类型名称),作用:读入内存并且创建文件夹
读写
顺序文件:读
line input #文件号,字符串变量
作用:从指定的文件中读取一行记录,存入指定的变量,不包括回车和换行符
input #文件号,变量列表
作用:从紧凑格式中读出,并且付给变量
input(读取的字符数,#文件号)
作用:从指定的顺序文件夹中,读出指定的字符
顺序文件:写
print #文件号 输出列表直接写入
write #文件号 输出列表紧凑+“”+字符串前后双引号
随机文件:读
get # 文件号,记录号,变量名
随机文件:写
put # 文件号,记录号,变量名
关闭并且保存
close #文件号,#文件号等文件最后要关闭,才能保存,文件重命名和删除都要关闭
删除和重命名文件
删除:kill "文件名"可以用通配符
重命名:name 原文件名 as 新文件名
设置读写操作的位置
seek #文件号,位置随机文件是指 记录号
改变文件属性
SetAttr "D:\Program Files\1.ini", vbSystem Or vbHidden作用:隐藏指定文件
2SetAttr "D:\Program Files\1.ini", vbNormal作用:恢复指定文件
《3》函数:
lof()返回文件字节数
eof()指针到达末尾,true,否则falsedir()检查文件在指定目录是否存在
loc(文件号)返回所读记录的记录号
seek(文件号)返回当前的读写位置
《4》内置对象
1,驱动器列表框:
drive1.drive="c"指定目录是c盘
2,目录列表框
dri1.path=dirver1.driver把指定驱动器的目录显示出来
3,文件列表框
file1.path=dir1.path指定目录的文件列表显示出来
4,进度条控件
位置:microsoft windows common control 6.0
progressbar.max=进度最大值
progressbar.min=最小值
progressbar.value=="进度指示值"
注意:通用先于窗体加载而存在。。。。。。。。。。