如何同时单击命令按钮显示文件（*。TXT）
用VB 6
是新来的VB 6
如何同时单击按钮，显示文件的内容
数据的存储在文本文件中，当我点击命令buttion，1.txt的文件将打开1.txt文件和数据的显示应前的1.txt
需要VB 6码的帮助？
Answer 1:
要只使用当前的默认文件处理程序尝试使用的ShellExecute API函数打开一个文件。
下面是一个例子 。
Answer 2:
一个文本框添加到窗体，使其多=真，添加一个按钮的形式。 而在按钮单击处理程序补充一点：
Private Sub Button1_Click()
Dim iFile As Long
Dim strFilename As String
Dim strTheData as String
strFilename = "C:\1.txt"
iFile = FreeFile
Open strFilename For Input As #iFile
strTheData = StrConv(InputB(LOF(iFile), iFile), vbUnicode)
Close #iFile
text1.text=strThedata
End Sub
这将读取文件中的文本，并把它添加到文本框。
编辑 ：改变了阅读的内容将在此指出的MarkJ更稳健行答案 （中房去到MarkJ来指出。）
Answer 3:
斯特凡的答案包含一个缺陷：读取文本文件转换成字符串代码不是很强劲。 这是一个非常常见的错误 - 同样有缺陷的代码是关于一些优秀的VB6的网站。 他的代码是
Open strFilename For Input As #iFile
strTheData = Input$(LOF(iFile), #iFile)
Close #iFile
不幸的是这引发错误 62“输入过去文件的结束”如果文本文件包含ASCII字符为零。 当然也不是所有的国家工作（它抛出在双字节字符集像中国或日本的大多数的数据都是错误）。
也许这些问题是有点晦涩：但有更好的代码在VB6手册 （做这个工作在这里 ），它也是三线，它永远不会失败。
Open strFilename For Input As #iFile
strTheData = StrConv(InputB(LOF(iFile), iFile), vbUnicode)
Close #iFile
它看起来更为复杂：但实际上，唯一的区别是，从ANSI到Unicode转换是显式的，而不是隐含的。 它运行一样快，而且它总是工作。
Answer 4:
没有进攻意图，但它听起来像是你需要一个初学者教程上VB6。 （我想这是因为你似乎并不能够阐明正是你需要什么帮助，可能是因为你不知道有足够的了解你想要做什么）。
谷歌搜索VB6教程会给很多链接， 这个看起来不错
希望这会有所帮助，并道歉，如果我错了:)
文章来源: How to display the text file while clicking the button
