VB如何Print在text里？

Question

如题所述

Answer 1

那叫读写text，你可以搜索“vb操作txt”,会出现很多方法，下面是我抄来的：
VB6.0对TXT文本文件的读写删操作
把文本文件内容写到TextBox：
Dim TempFile As Long
Dim LoadBytes() As Byte

TempFile=FreeFile
Open 文件名 For Binary As #TempFile
Redim LoadBytes(1 To Lof(TempFile)) As Byte
Get #TempFile,,LoadBytes
Close TempFile

Text1.Text=StrConv(LoadBytes,vbUniCode)

把TextBox内容写入文本文件：
Dim TempFile As Long
Dim SaveBytes() As Byte

SaveBytes=StrConv(Text1.Text,vbFromUniCode)

TempFile=FreeFile
Open 文件名 For Binary As #TempFile
Put #TempFile,,SaveBytes
Close TempFile
删除TXT文件里的内容：
Private Function DelLine(strFile As String, RLine As Long, newFile As String, SameLine As Boolean)
Dim s As String, n As String, i As Long
i = 1
'//打开源文件
Open strFile For Input As #1
Do Until EOF(1)
Line Input #1, s
If RLine = i Then '如果是指定的行数就进行下面的操作
If SameLine = True Then '是否保持源文件行数不变(以空白字符替换这一行内容)的提示,True保持源文件的行数,False为直接删除这一行的内容
s = ""
n = n & s & vbCrLf '将空字符串赋给变量n,以保持源文件的行数
' MsgBox strFile & " 文件中,第 " & RLine & " 行内容" & vbCrLf & s & vbCrLf & "已经删除", vbInformation, "消息提示"
End If
' s="也可以把这一行的内容改成自己需要的"

Else '如果不是指定的行数,就将s的内容赋给变量n 以存储数据
n = n & s & vbCrLf '将s的内容赋给n 并以一个回车符号结束....
End If
i = i + 1
Loop
Close #1
'//写入新文件,如果和源文件同名则会覆盖源文件
Open newFile For Output As #2
Print #2, n '将n变量里的数据写入新文件
Close #2
End Function
'调用方法:
'比如要把c:\1.txt 删除其中的第5行内容,并保留源文件总行数(删除的这行插入一空字符串)
'DelLine "C:\1.txt", 5, "C:\2.txt", True
'删除C:\1.txt 删除里面的第一行,且不保留文件的总行数
DelLine "C:\1.txt", 1, "C:\1.txt", False

Answer 2

Text文本框不支持Printf方法。要想把内容通过代码加入到文本框中，要先确定加入的位置。如果是加入到它的最前面或是最后面的话就特别简单：
只要Text1.Text=Text1.Text & a$ & "或字符串常量“--------------这是加在后面的例子。追问

看了没看懂。高手 支持print的除了在窗体上，还有哪些对象支持呢

追答

print方法
在VB中，Print方法是用来输出信息的专用过程，可以用来显示文本字符串和表达式的值。Visual
Basic允许在窗体、图形框和打印机用Print方法显示文本字符串。

格式： [对象.]Print 表达式表
“表达式表”是一个或多个表达式,可以是数值表达式或字符串。若为数值表达式，打印出表达式的值，但在数值的前面有一个符号位（负号用“-”表示，正号用空格代替），每输出一个数值后自动留出一个空格；而字符串则原样照打，前后均无空格。如果省略“表达式表”，则输出一个空行。
表达式表的语法结构如下:{Spc(n) | Tab(n) |表达式 分隔符}
Spc(n)：可选。用来在输出中插入空白字符，这里n为要插入的空白字符数。
Tab(n)：可选。用来将插入点定位在绝对列号上，这里n为列号。要输出的内容放在Tab函数的后面，并用分号（；）分开。
如：Print Tab(25)；300
将在第25列开始输出数值300。(注意数值300前的符号位和其后的空格位)
表达式：可选，表示要打印的数值表达式或字符串表达式。
分隔符：可选，指定下一个字符的插入点。使用分号（；）或空格，直接将插入点定位在上一个被显示的字符之后（称紧凑输出格式）；使用逗号（，）将下一个输出字符的插入点定位在制表符上，即以14个字符位置为单位把一个输出行分为若干个区段，逗号后面的表达式在下一个区段输出（称标准输出格式）；如果省略插入点位置符号，则在下一行打印下一字符。
注意：（1）输出时，逻辑型数据，打印True或False；日期格式以标准短日期格式书写；若表达式为空，则无内容可写。（2）如果缺省对象，则表示当前窗体。
例1：Form1.Print "hello"
例2：Print "hello"

本回答被提问者和网友采纳

Answer 3

text1="内容"
或:
text1.text="内容"
'请参考采纳！谢谢！

Answer 4

无法在TextBox上使用Print

原因：TextBox是一个控件。这个控件不支持Print

Answer 5

直接用textbox的.text属性