许多程序需要读写数据,比如商品管理,图书管理,学生档案等,当需要查询的时候,就是读取数据,新增或者更改就需要写数据,VB来讲,中小型的数据一般用Access数据库,大型的数据多用SQL server数据库,这些以后再讲,今天主要了解如何读写txt文本文件。
如何读取txt
在生活中,我们要看一本书,先找到这本书,然后打开,开始读,读完了要合上书,放回原处,然后别人再读。在程序中,过程是一样的,我们新建一个工程,在窗体上放一个label标签控件,一个Text文本框控件,一个Command按钮控件,在C盘根目录新建一个文本文件,重命名为1.txt,在txt中写入张明并保存,如图设置:
在Command1的单击事件中写下面的代码:
我来解释每一个代码的含义:
Open 是打开文件,相当于你读书前要翻开书一样。
"C:1.txt" 是文件的地址,就像你读书前要知道这本书在哪一样。
For Input 是打开的方式,Input是读取,以这种方式打开文件时,文件必须存在,否则会产生错误。也就是说,刚才如果C盘根目录没有这个1.txt程序就会报错。
As #1 为打开的文件指定文件号.对文件进行读写操作时,要用文件号表示该文件.文件号是介于1~511之间的整数。
Line Input #1, a 的意思是读取第一行并赋值给a。
Close #1 是关闭这个文件,然后释放文件号,也就是你看完书,合上,放回原处。
运行效果:
如何写入txt
我们在原有的窗体上再加上一个标签,一个文本框,一个按钮,如图:
然后在"写入"按钮的单击事件中写入如下代码:
我们发现只有两处代码不一样,其他都一样,相同的部分我们就不解释了,我们来看不同的:
For Output表示向打开的文件中写入数据。以这种方式打开文件时,文件中原有的数据将被覆盖,新的数据将从文件开始写入。如果文件不存在,则创建一个新文件。如果刚才C盘根目录没有1.txt,程序就会自动创建一个。
Print #1, a ,这里Print是输出,也就是把a写入到#1里面。
用这种方式打开文件,写入的时候会覆盖原有的数据,形成一个新的数据,比如原来的txt文件里面是张明,我们写入"李亮"以后,就会把"张明"覆盖,看下运行效果:
读取方式还有一种:
For Append,表示向打开的文件中添加数据。以这种方式打开时,文件中原有的数据将被保留,新的数据将从文件开始添加。如果文件不存在,则创建一个新文件。
我们把写入的读取方式改为For Append ,用这种方式打开文件,写入"李亮"的时候,会在原有的数据上增加,并不会把"张明"覆盖。我们看下效果:
我们把打开方式改为 Append :
效果图:
读写txt有什么用
虽然txt用来储存数据不规范,但是也有一定的用途,比如可以当做程序的配置文件,举个例子,我们把上面的代码稍加改动,在窗体加载的时候读取"C:1.txt"里面的数值,并把按钮的字体大小设置成这个数值,就可以当一个简易的程序配置文件:
代码: