VB TEXT信息输出问题

来源:百度知道 编辑:UC知道 时间:2024/05/25 14:11:24
TEXT信息输出文字怎么换行
将举例程序写一下

将TEXT的MultiLine属性设为True即可,输入时在需换行处按Enter键即可

用正则表达式:
dim aa as string
aa=text1.text
aa=replace(aa," ","  ")(NBSP;应该是小写)
aa=replace(aa,chr(13)&chr(10),"<br>")

来凑个热闹:
text1.text = "a" & chr(13) & chr(10) & "b"
chr(13) & chr(10)是换行符,即hex码中的"0D0A"

另外Multiline属性要改为True

text1.text = "a" & vbCrlf & "b"
vbCrlf是换行符

另外Multiline属性要改为True,ScrollBar属性改为"Vertical" / "Both"

multiline指是否允许滚动条,这个属性要为true
然后要换行有两种方法:
1.如果直接在属性中设置caption属性,按enter键
2.如果编代码的话,用:
text1.text="正文" & chr(13) & chr(10) & "正文"
chr()是把ASCII值换为字符的函数,chr(13)是回车,chr(10)是换行。

text1.text = "a" & chr(13) & chr(10) & "b"
chr(13) & chr(10)是换行符,即hex码中的"0D0A"

另外Multiline属性要改为True
这样在text上就会出现两行的字母,第一行是 a 第二行是 b 。