① 求vb所有基本文本操作命令
vb对文件操作功能很强大的,不过总结来说可以简单用也可以复杂用。第一段代码就是一个写文件的例子。后面的都是对文本文件添加和读取的方法,耐心试验一下就会用了。
Print # 语句示例
本示例使用 Print # 语句将数据写入一个文件。
Open "TESTFILE" For Output As #1 ' 打开输出文件。
Print #1, "This is a test" ' 将文本数据写入文件。
Print #1, ' 将空白行写入文件。
Print #1, "Zone 1"; Tab ; "Zone 2" ' 数据写入两个区(print zones)。
Print #1, "Hello" ; " " ; "World" ' 以空格隔开两个字符串。
Print #1, Spc(5) ; "5 leading spaces " ' 在字符串之前写入五个空格。
Print #1, Tab(10) ; "Hello" ' 将数据写在第十列。
' 赋值 Boolean、Date、Null 及 Error 等。
Dim MyBool, MyDate, MyNull, MyError
MyBool = False : MyDate = #February 12, 1969# : MyNull = Null
MyError = CVErr(32767)
' True、False、Null 及 Error 会根据系统的地区设置自动转换格式。
' 日期将以标准的短式日期的格式显示。
Print #1, MyBool ; " is a Boolean value"
Print #1, MyDate ; " is a date"
Print #1, MyNull ; " is a null value"
Print #1, MyError ; " is an error value"
Close #1 ' 关闭文件。
使用顺序文件访问
推荐您使用 File System Objects 来创建文本文件,但该信息只在需要使用旧文本文件创建方法时才提供。
当要处理只包含文本的文件时,比如由典型文本编辑器所创 建的文件-也就是说,其中的数据没有分成记录的文件,使用顺序型访问最好。顺序型访问不太适于存储很多数字,因为每个数字都要按字符串存储。一个四位数将需要 4 个字节的存储空间,而不是作为一个整数来存储时只需的 2 个字节。
打开顺序访问文件
当以顺序型访问打开一个文件时,可执行以下操作:
从文件输入字符 (Input)
向文件输出字符 (Output)
把字符加到文件 (Append)
要顺序型访问打开一个文件,Open 语句使用以下语法:
Open pathname For [Input | Output | Append] As filenumber [Len = buffersize]
当打开顺序文件作为 Input 时,该文件必须已经存在,否则,会产生一个错误。然而,当打开一个不存在的文件作为 Output 或 Append 时,Open 语句首先创建该文件,然后再打开它。
当在文件与程序之间拷贝数据时,选项 Len 参数指定缓冲区的字符数。
在打开一个文件 Input、Output 或 Append 以后,在为其它类型的操作重新打开它之前必须先使用 Close 语句关闭它。
编辑为顺序访问打开的文件
如果要编辑一个文件,先把它的内容读入到程序变量,然后改变这些变量,最后再把这些变量写回到该文件。以下各节讨论如何编辑以顺序型访问打开的各记录。
从文件中读取字符串
要检索文本文件的内容,应以顺序 Input 方式打开该文件。然后使用 Line Input#,Input( ),或者 Input# 语句将文件拷贝到程序变量中。
Visual Basic 提供了一次读写顺序文件一个字符或一行的语句和功能。
例如,以下代码段逐行读取一个文件:
Dim LinesFromFile, NextLine As String
Do Until EOF(FileNum)
Line Input #FileNum, NextLine
LinesFromFile = LinesFromFile + NextLine + Chr(13) + Chr(10)
Loop
尽管 Line Input # 到达回车换行时它会识别行尾,但是,当它把该行读入变量时,不包括回车换行。如果要保留该回车换行,代码必须添加。
也可以使用 Input # 语句,它读取文件中所写的一列的数字和/或字符串表达式。例如,要从一个邮件列表文件中读取一行,可使用以下语句:
Input #FileNum, name, street, city, state, zip
可以使用 Input 函数来从文件向变量拷贝任意数量的字符,所给的变量大小应足够大。例如,以下的代码使用 Input 把指定数目的字符复制到变量。
LinesFromFile = Input(n, FileNum)
要将整个文件复制到变量,请使用 InputB 函数将字节从文件复制到变量。因为InputB 函数返回一个 ANSI 字符串,您必须使用 StrConv 函数将 ANSI 字符串转换为一个如下的 UNICODE 字符串:
LinesFromFile = StrConv(InputB(LOF(FileNum), FileNum), vbUnicode)
把字符串写入文件
要在顺序文件中存储变量的内容,应以顺序 Output 或 Append 打开它,然后使用 Print # 语句。例如,文本编辑器可以使用以下代码行来把一个文本框的内容拷贝到文件。
Print #FileNum, TheBox.Text
Visual Basic 也支持 Write # 语句,它把一列数字和/或字符串表达式写入文件。它自动地用逗号分开每个表达式,并且在字符串表达式端放置引号。
Dim AnyString As String, AnyNumber As Integer
AnyString = "AnyCharacters"
AnyNumber = 23445
Write #FileNum AnyString, AnyNumber
这个代码段把两个表达式写入由 FileNum 指定的文件。第一个表达式包含一个字符串而第二个包含数字 23445。因而,Visual Basic 把以下的字符(包括所有标点符号)写入到文件中:
"AnyCharacters",23445
注意 如果正在用顺序型访问的 Write # 与 Input # 语句,可考虑换用随机型 或二进制型访问,因为它们更适合面向于记录的数据。
详细信息 有关顺序文件访问的其它信息,请参阅“Open 语句”。
Open 语句示例
本示例示范 Open 语句的不同用法来做到文件的输出与输入。
下列代码以顺序输入模式打开 TESTFILE 文件。
Open "TESTFILE" For Input As #1
' 若要以其他方式打开文件,必需先关闭此文件。
Close #1
下列代码以只允许写操作的二进制方式打开文件。
Open "TESTFILE" For Binary Access Write As #1
' 若要以其他方式打开文件,必需先关闭此文件。
Close #1
下列代码以随机方式打开文件,文件中含有用户自定义数据类型 Record 的记录。
Type Record ' 定义用户自定义数据类型。
ID As Integer
Name As String * 20
End Type
Dim MyRecord As Record ' 声明变量。
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
' 若要以其他方式打开文件,必需先关闭此文件。
Close #1
下列代码以顺序输出方式打开文件;任何过程都可以读写该文件。
Open "TESTFILE" For Output Shared As #1
' 若要以其他方式打开文件,必需先关闭此文件。
Close #1
下列代码以只允许读的二进制方式打开文件;其他过程不可以读该文件。
Open "TESTFILE" For Binary Access Read Lock Read As #1
能够对文件输入/输出 (I/O)。
语法
Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength]
Open 语句的语法具有以下几个部分:
部分 描述
pathname 必要。字符串表达式,指定文件名,该文件名可能还包括目录、文件夹及驱动器。
mode 必要。关键字,指定文件方式,有 Append、Binary、Input、Output、或 Random 方式。如果未指定方式,则以 Random 访问方式打开文件。
access 可选。关键字,说明打开的文件可以进行的操作,有 Read、Write、或 Read Write 操作。
lock 可选。关键字,说明限定于其它进程打开的文件的操作,有 Shared、Lock Read、Lock Write、和 Lock Read Write 操作。
filenumber 必要。一个有效的文件号,范围在 1 到 511 之间。使用 FreeFile 函数可得到下一个可用的文件号。
reclength 可选。小于或等于 32,767(字节)的一个数。对于用随机访问方式打开的文件,该值就是记录长度。对于顺序文件,该值就是缓冲字符数。
说明
对文件做任何 I/O 操作之前都必须先打开文件。Open 语句分配一个缓冲区供文件进行 I/O 之用,并决定缓冲区所使用的访问方式。
如果 pathname 指定的文件不存在,那么,在用 Append、Binary、Output、或 Random 方式打开文件时,可以建立这一文件。
如果文件已由其它进程打开,而且不允许指定的访问类型,则 Open 操作失败,而且会有错误发生。
如果 mode 是 Binary 方式,则 Len 子句会被忽略掉。
重要 在 Binary、Input 和 Random 方式下可以用不同的文件号打开同一文件,而不必先将该文件关闭。在 Append 和 Output 方式下,如果要用不同的文件号打开同一文件,则必须在打开文件之前先关闭该文件。
② vb 命令大全
VB 可用指令、函数
A
Abs 求绝对值 ActiveControl 得到焦点的对象
ActiveForm 得到焦点的表单 Array 指定数组
App 得知程序信息 AppActivate 激活执行中的应用程序
Asc 求字符的内码 AscB 求字符的ASCII
AscW 求字符的UniCode Atn 求Tan-1
B
Beep 发出预设的警示声
C
Call 调用子程序 Calendar 选择月历
Choose 取出一列值的某个值 CBool 数值转成布尔数
CByte 数值转成位元格式 CCur 数值转成货币格式
CDate 数据转成时间 CDbl 数值转成双精度浮点数
CDec 数据转成十进数 ChDir 改变目前路径缓充的路径
ChDrive 改变目前磁盘缓充的磁盘 Chr 由内码求得一字符
ChrB 由ASCII求得一字符 ChrW 由UniCode求得一字符
CInt 数据转成Integer CLng 数据转成Long
Command 读出程序的参数 Const 定义常数
Cos COS CSng 数值转成单精度浮点数
CurDir 得知目前路径缓充的路径 CVar 数值转成可变变量
D
Date 得到目前电脑的时间 Date$ 得到目前电脑时间字符串
DateAdd 日期加法得日期 DateDiff 日期相减得数值
DatePart 日期部份资讯 DateSerial 字符串转日期
DateValue 数字转日期 Day 得知日期变量内是几号
DDB 折旧的计算 DeleteSetting 删除系统登录内的数据
Dir 得知目前路径内的文件名 DoEvents 闲置函数
E
End 结束程序 Environ 取得环境变量的数据
EOF 某个文件缓冲的指标是否到档尾 Erase 重新初始化数组
Err 错误资讯 Error 错误代码信息
Exp 得到自然对数
F
Fix 去除小数 FileCopy To 复制文件
FileAttr 文件开启模式 FileDateTime 文件存档日期
FileLen 文件长度 Filter 筛选数组
Format 数据格式化输出 FreeFile 空的文件编号
FV 求得定期、定额支付且固定利率下之年金的值
G
GetAllSetting 得到所有系统登录的资讯 GetAttr 得知文件属性
GetSetting 得到系统登录的资讯
H
Hex 将数值转成16进数表示的字符串 Hour 得知日期变量内是几时
I
If . Then . Else 判断结构 IMEStatus 得知IME输入法状态
InStr 寻找字符串里的字符串 InStrB 寻找字符串里的ASCII
IntStrRev 由字符串右边开始寻找字符串里的字符串
Int 取整数
J
Join 将数组数据加入分隔字符后组合成一新字符串
K
Kill 删除文件
L
LBound 得知数组最小起始范围 LCase 字符串转小写
Left 截取字符串左边几个字 Len 得知字符串的字数
LenB 得知变量占用记忆体几个Byte LoadPicture 载入图形
Log 求对数值 LSet 字符串向左对齐
LTrim 移除字符串最左边的空白字符
M
Mid 截取字符串里某些字符串 Minute 得知日期变量内是几分
MkDir 建立新的数据颊 Month 得知日期变量内是第几月
N
Name As 更改文件名 Now 得知目前点脑的日期与时间
O Oct 字符转成八进制的字符串 Option VB内部一些选项设定
P
PopupMenu 跳出菜单 Print 打印数据
Q
QBColor 设定颜色(16色)
R
Randomize 随机数初始化声明 Replace 取代字符串中某些字符串 VB6提供
RGB 设定颜色(255*255*255色) RmDir 移除数据颊
Rnd 得到一个随机数 RSet 字符串向右对齐
RTrim 去除字符串最右边的空白字符
S
SavePicture 储存图形 Screen 得知屏幕简易资讯
Second 得知日期变量内是几秒 SetAttr 设定文件属性
Sgn 得知是整数还是负数v Shell 执行外部程序
Sin 得知Sin Space 填入数个空白字符
Split 以某字符串将字符串拆解成数组 VB6提供
Sqr 求平方根
Str 数值转字符串 StrComp 比较字符串
StrConv 改变字符串型态 String 设定一个重覆的字符串
StrReverse 字符串反转 VB6提供
T
Tab 打印n个制表符 Tan 得知Tan
Time 得知、设定电脑时间 Time$ 得知、设定时间字符串
Timer 得知今天电脑总秒数 TimeSerial 字符串转时间
TimeValue 数字转时间 Trim 去除字符串首尾的空白字符
TypeName 得知变量类别的名称
U
UBound 得知数组的最值 UCase 字符串转大写
V
Val 将字符串转成数字 VarType 得知变量的类型
W
WeekDay 得知日期变量内是星期几 WeekdayName 将WeekDay传回值改成文字显示
Y
Year 得知日期变量内是几年