文本转换问题

[jimqiu]

要使文本框控件显示:
"Java"
"ssss"
这段文字,代码必须这样写:
Text1.text=Chr(34) & "Java" & Chr(34) & Vbcrlf & chr(34) & "ssss" & chr(34)
如果是长篇文本的话,就十分麻烦,我想编一个文本转换程序,将原先的文本自动转换成文本框可以识别的那种,麻烦各位高手帮帮忙

[jimqiu]

如果要使Textbox或RichTextbox显示如下的文本:
"VVVVV"
AAAAAA(文本1)
代码必须这样写Text1.text=Chr(34) & "VVVVV" & Chr(34) & VbCrlf & "AAAAAA"(文本2)
十分麻烦.所以我想编一个程序,首先由用户输入形如文本1的文本,然后转换成形如文本2的可以被Textbox接受的代码

[jimqiu]

记住不是用户自行输入,而是触发某个事件后,由程序定义要显示的内容

[jimqiu]

再清楚些:比如说窗体上有两个按钮和一个Textbox,按按钮1显示文本1,按钮二显示文本2,要显示的文本由我事先写在字符串变量中.
假如要显示:
"Java"
"ssss"
不得这样写吗:Text1.text=Chr(34) & "Java" & Chr(34) & Vbcrlf & chr(34) & "ssss" & chr(34)???
我要编的程序正是先由用户输入:一段含有换行和引号的文本,然后在另外一个文本框中,生成形如:
Text1.text=Chr(34) & "Java" & Chr(34) & Vbcrlf & chr(34) & "ssss" 这样的文本,可减轻输入的负担

[OUYAN]

用RichTextbox吧，我操作文本，只用RichTextbox，
loadfile是装入文件，savefile是保存文件。

[gameboy999]

可以用line input语句,尽量别用richtext,太浪费资源

[chenjun]

用richtextbox吧

[jimqiu]

RichTextbox和Textbox有什么区别?

[prefix]

原先的文本是指怎样的?

[xiaosh]

还是用RichTextbox比较好，可以接受多种格式的文本，特别考虑到大量文本和转换格式的话，控件的各种方法和属性可在MSDN中查得到！

[bing71]

RichTextBox可以为各段文字设定很多不同的格式，如字体、前景色、背景色等。

[mostar]

用val就很管用

[flywhc]

用一串replace了事
比如
s=replace(text1.text,chr(13),chr(34)+"+chr(34)+ vbcr +chr(34)+"+chr(34))
.....
不过要判断长度，必须要分段，这个比较麻烦，用left和mid函数切成段，然后
s=s+"....."