vb6怎样显示文本文件到文本框内

❶ vb怎么把结果输出到文本框里

参考输出方法如下：

❷ vb 怎样打开文件并把文件内容显示在文本框

1、单击菜单“工程”-“部件”，在弹出的“部件”对话框里找到MicrosoftRichTextBox6.0和公共对话框MicrosoftCommonDialog6.0并选中它们，单击“确定”按钮。

2、在窗体上绘制RichTextBox和CommnDialog。

3、右键窗体选择菜单编辑器，编写打开和清空菜单。

4、两个按钮代码：

PrivateSubopen_Click()

CommonDialog1.Filter="文本文件(*.txt)|*.txt|(*.doc)|*.doc|所有文件|*.*"

CommonDialog1.ShowOpen

RichTextBox1.Text=""'清空文本框

FileName=CommonDialog1.FileName

RichTextBox1.LoadFileFileName

Me.Caption="超级记事本："&FileName

EndSub

PrivateSubqk_Click()

RichTextBox1.Text=""

EndSub

5、注意：打开txt文件时正常的，但是打开word是乱码，因为word的存储方式跟txt文件不一样的，这个是正常的。

❸ vb怎样把文本数据导入文本框

添加下图控件，并拖到窗体上。版

Private Sub Command1_Click()

Dim ReadStr As String

Text1.Text = ""

CommonDialog1.Filter = "文本文件权(*.Txt)|*.txt"

CommonDialog1.ShowOpen

CommonDialog1.Flags = &H8

If CommonDialog1.FileName = "" Then Exit Sub

Open CommonDialog1.FileName For Input As #1

Do While Not EOF(1)

Input #1, ReadStr

Text1.Text = Text1.Text + ReadStr + vbCrLf

DoEvents

Loop

Close #1

CommonDialog1.FileName = ""

End Sub