1,451
社区成员
发帖
与我相关
我的任务
分享简单问题，快来抢分！
1。 若RichTextBox中已经有内容，如何用代码实现在该内容的最前面和最后面增加内容？
2。 vb中，对文件进行操作的函数有哪些？如：以读，写方式打开文件，追加文件等等。
谢谢！
2。 vb中，对文件进行操作的函数有哪些？如：以读，写方式打开文件，追加文件等等。
谢谢！
...全文
请发表友善的回复…
发表回复
northwolves 2003-09-17
- 打赏
- 举报
1.richtextbox1.selstart=0
richtextbox1.selstart=len(richtextbox1)
2.
read
input
output
write
print
等等
richtextbox1.selstart=len(richtextbox1)
2.
read
input
output
write
等等
ttcat 2003-09-17
- 打赏
- 举报
若我有一文件test.txt，想把它的内容读出到text1中。怎么写读语句？
谢谢!
谢谢!
northwolves 2003-09-17
- 打赏
- 举报
Private Sub Command1_Click()
Dim x As String
x = String(FileLen("c:\test.txt"), " ")
Open "c:\test.txt" For Binary As #1
Get #1, , x
Close 1
Text1.Text = x
End Sub
Dim x As String
x = String(FileLen("c:\test.txt"), " ")
Open "c:\test.txt" For Binary As #1
Get #1, , x
Close 1
Text1.Text = x
End Sub
