Question

vb中如何把变量的值写入txt文件中？

vb中如何把变量的值写入txt文件中？
我想把g，l，hu等等变量中存入txt文件中，如何编写代码呢，谢
我是这样编的程序的，但是出来的txt文件只有相应的行，是空白行。这是怎么回事呢？我怀疑是变量的问题，但是我的变量在前一个窗口输入值了啊
Open "d:\shuju.txt" For Output As 1
Print #1, d
Print #1, s
Print #1, l
Print #1, n
Print #1, ge
Print #1, ne
Print #1, gnum
Print #1, ysb
Print #1, hu
Print #1, pa
Print #1, ta
Print #1, psc
Print #1, tsc
Print #1, asc1
Print #1, aeo
Print #1, aso
Print #1, aec
Print #1, ved
Print #1, vsd
Print #1, lo
Print #1, dan

Answer 1

这是Open函数的原型

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（字节）的一个数。对于用随机访问方式打开的文件，该值就是记录长度。对于顺序文件，该值就是缓冲字符数。

#号在这里是表明 其后面的是一个有效的文件号,它可以省略,即不加也行
一般会在函数的参数中告诉你是否使用#号

在VB中,在函数中一般是在 一个有效的文件号前边加#号,比如下边的几个函数
其中的参数也用到文件号,

Width语句(这里的#号不能省略)

Width #filenumber, width

Width # 语句的语法具有以下几个部分：

部分 描述
filenumber 必要。任何有效的文件号。
width 必要。范围在 0-255 之间的数值表达式，在新的一行开始之前，指出在该行上可出现多少字符。如果 width 等于 0，则行的长度不受限制。width 的缺省值为 0。

Seek语句

Seek [#]filenumber, position

Seek 语句的语法具有以下几个部分：

部分 描述
filenumber 必要。任何有效的文件号。
position 必要。介于 1 - 2，147，483，647 之间的数字，指出下一个读写操作将要发生的位置。

Get 语句 返回

将一个已打开的磁盘文件读入一个变量之中。

语法

Get [#]filenumber, [recnumber], varname

Get 语句的语法具有以下几个部分：

部分 描述
filenumber 必要。任何有效的文件号。
recnumber 可选。Variant (Long)。记录号（Random 方式的文件）或字节数（Binary 方式的文件），以表示在此处开始读出数据。
varname 必要。一个有效的变量名，将读出的数据放入其中。

Lock，Unlock语句 返回

对于用 Open 语句打开的全部文件或一部分文件，其它进程所进行的控制访问。

语法

Lock [#]filenumber[, recordrange]
. . .

Unlock [#]filenumber[, recordrange]

Lock 和 Unlock 语句的语法具有以下几个部分：

部分 描述
filenumber 必要。任何有效的文件号。
recordrange 可选。要锁定或解锁的记录范围。

设置

recordrange 参数的设置如下：

recnumber [start] To end

设置 描述
recnumber 记录号（Random 方式的文件）或字节数（Binary 方式的文件），指定要开始锁定或解锁的位置。
start 第一个要锁定或解锁的记录号或字节数。
end 最后一个要锁定或解锁的记录号或字节数。

但也有在有效文件号前不加#号的,如下边的几个函数

FileAttr函数 返回

返回一个 Long，表示使用 Open 语句所打开文件的文件方式。

语法

FileAttr(filenumber, returntype)

FileAttr 函数的语法具有以下几个命名参数：

部分 描述
filenumber 必要。Integer 类型，任何有效的文件号。
returntype 必要。Integer 类型。它是数字，指出返回信息的类型。指定 1 则可返回一个代表文件方式的数值。而仅仅在 16 位系统中， 指定 2 才可以恢复操作系统的文件句柄。在 32 位系统中不支持 Returntype 2，它会导致错误发生。

LOF函数 返回

返回一个 Long，表示用 Open 语句打开的文件的大小，该大小以字节为单位。

语法

LOF(filenumber)

必要的 filenumber 参数是一个 Integer，包含一个有效的文件号。

注意 对于尚未打开的文件，使用 FileLen 函数将得到其长度。

Answer 2

open "c:\1.txt" for output as #1
print #1,g,l,hu'其他的可以用逗号分隔写在后面，
print #1,a'也可以另起一行
close

Answer 3

open "a.txt" for random as #1
Print #1, g & l & hu
close #1

这里Open "d:\shuju.txt" For Output As 1
应该是Open "d:\shuju.txt" For Output As #1
最好是程序结束后加句close #1

Answer 4

变量->全局变量