Question

VB 文本读取+列表框+复选

我想用列表框先读取指定文件夹中所有txt文本的文本名，然后在列表框中复选，选中的多文本同时读取，作为#1，能在列表框中复选我已经做到了，后头的该怎么做？大致如图所示
代码先行，只给思路就不要说了，因为作为小白一个，很多时候你说了思路也不知道该怎么完成

Answer 1

1，多个文本文件只能一个一个读取。
2，读取到文件内容后，你要怎么处理呢？

追问

1. 其实我就是希望能够一次能够读取多个文本

2. 图片你也看到了，我想做一个字典，读了之后自然要将数据根据text1中输入的内容，分别将单词和释义分别显示在datalist1和richtextbox中

追答

对呀，我的理解，你所谓一次读取多个文本，就是单击按钮，可以完成读取多个文本文件，这个是可以完成的，无非就是一个一个读取文件内容。
比如：

Private Sub Command1_Click()

Open App.Path & "\1.txt" For Input As #1 '以读的方式打开文件
读取第1个文件
Close #1 ' 关闭文件。

Open App.Path & "\2.txt" For Input As #1 '以读的方式打开文件
读取第2个文件
Close #1 ' 关闭文件。

......

Open App.Path & "\n.txt" For Input As #1 '以读的方式打开文件
读取第n个文件
Close #1 ' 关闭文件。

End Sub

追问

文本名不定啊，需要能够随时根据文本的增多减少和选择而改变啊

追答

你通过我的主页，找我的联系方式联系我，或者留你，联系方式

Answer 2

你的意思是 把这选中的所以文本读到 一个文件里（数组里）？

追问

应该是吧，

追答

明白了 你现在 就是只能做个界面，外加 做了个复选，其他都不会写的意思啊。。

追问

我现在就是东问西问加上网上找到的类似功能的代码，然后拼凑而成。这个也完成的话，代码方面就大概完成了五分之三
你拿一个界面，然后让人家给你完善代码当然不大可能，还是得拆开一点一点的问