vb用input读取文件,挨着字符读取,写入到text1.text,可是结果显示不出换行

能读取回车,但是在text框中却不换行,老师讲的时候我记得我做了一下,还可以显示出致橡树的格式呢,现在要考试了,做了一下发现不行了,都在一行显示,不换行,帮我T.TPri... 能读取回车,但是在text框中却不换行,老师讲的时候我记得我做了一下 ,还可以显示出致橡树的格式呢,现在要考试了,做了一下发现不行了,都在一行显示,不换行,帮我 T.T
Private Sub Command1_Click()
Dim s$
Open "c:\text.txt" For Input As #1
Do
s = Input(1, #1)
Text1.Text = Text1.Text & s
Loop Until EOF(1)
close #1
End Sub
展开
 我来答
百度网友f56c963
2013-07-05 · TA获得超过555个赞
知道小有建树答主
回答量:308
采纳率:100%
帮助的人:125万
展开全部
text1.text=Text1.Text & s & vbCrLf
VBCRLF是换行符号、、、、、、、不弄不行的
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
xbj_hyml
2013-07-05 · TA获得超过285个赞
知道小有建树答主
回答量:552
采纳率:100%
帮助的人:434万
展开全部
你要把 Text1 的 Multiline 属性 设为 True
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
chinaboyzyq
2013-07-05 · TA获得超过1.3万个赞
知道大有可为答主
回答量:1.3万
采纳率:89%
帮助的人:3287万
展开全部
text框需要设置多行属性为真。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友c34f6e7
2013-07-05 · TA获得超过101个赞
知道小有建树答主
回答量:166
采纳率:88%
帮助的人:110万
展开全部
multiline 设为 true
text1.text=text1.text & s & vbcrlf
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式