最近在学VB.NET,编了个软件，用什么方法在RichTextBox中打开二个指定路径的TXT文件。

Question

我有2个TXT文件:
1、blood.txt、
2、defecate.txt。
文件位置在C：\file中
怎么使RichTextBox中打开这二个TXT文件，用Loadfile方法只能打开一个文件。查了网上的有用fileopen的方法调用openfiledialog对话框实现。我想用一个button点击后在RichTextBox中显示。两个文件的内容用2个换行分开。

Answer 1

用Open C：\file\blood.txt" For Input As #1
读入至a
用Open C：\file\defecate.txt" For Input As #1
读入至b
RichTextBox.text=a & vbcrlf & vbcrlf & b

追问

怎么读入至a和b，难写个完整的代码吗。谢谢

追答

dim a as string
dim b as string
dim s as string
Open C：\file\blood.txt" For Input As #1
do while not eof(1)
Line Input #1, s
a= a & s
loop
Close #1
Open C：\file\defecate.txt" For Input As #1
do while not eof(1)
Line Input #1, s
b= b & s
loop
Close #1
RichTextBox.text=a & vbcrlf & vbcrlf & b
不好意思，这是VB6的代码，不知是否可用

追问

VB.NET没法通过。语法错误