Question

如何在VB的TXT显示框中加入空格和回车？

就是我在一个文件中读入一系列值，想显示在TXT框中，但是显示的时候，文字都连在一块儿了，没有间隔，想请问怎么在显示的框中加入空格和回车显示呢？谢谢啦~
举个例子：
读入的文本中的文字是这样的：

北京28度晴适宜出行
上海29度雨不适宜出行
广州30度多云事宜出行

希望在文本框中显示成这样子的：

北京 28度 晴 适宜出行
上海 29度 雨 不适宜出行
广州 30度 多云 适宜出行

Answer 1

空格可以用space（）

换行回车可以vbcrlf

TXT要设置成多行显示

Option Explicit
Private Sub Command1_Click()
Text1.Text = "北京" & Space(2) & "28度" & Space(2) & "晴" & Space(2) & "适宜出行" & _
    vbCrLf & "上海" & Space(2) & "29度" & Space(2) & "雨" & Space(2) & "不适宜出行"
End Sub

有问题请追问，满意请采纳。

追问

首先感谢您的回答，非常感谢！
但您可能误解了我的意思。
我的意思是读入的信息整个是一个文本，将这个文本作为一个整体读入后，在输出显示的时候输出成我给出的样子。而并不是这样亲自对每个字符进行控制输出。
如果您仍然知道如何做，请您告诉我，谢谢啦！

追答

我以为给出下面这些你就会了。。。给出的代码只是一个示例，说明他们怎么用。。。
空格可以用space（）
换行回车可以vbcrlf
TXT要设置成多行显示

读入的信息可以一行一行的读入，比如读入的第一行“北京28度晴适宜出行”，可以用字符处理函数split（）分割，分割之后再看上面的例子，按照这样处理即可。

问题：你的数据是连在一起的，需要分开的数据之间没有分隔符，所以处理起来很难，如果可以，希望加个分隔符，如“北京，28度，晴，适宜出行”，这样用split（）处理起来就很方便
有问题再追问

Answer 2

vbTab 是制表符
vbCrlf 是回车符

你这个可以判断字符长度，比如天气和是否适宜出行，如果天气是2个字符（汉字占两个字符）后面是<若干>空格，如果天气是4个字符后面就是<若干-2>个空格。

Answer 3

这个要求，有点难？
计算机是没有人类智慧的，难道它能知道前两个字是地方名？天气是1个字或个字？
要是碰到，内蒙古、齐齐哈尔怎么办呢？

追问

我想的是，如果定义一个输出的格式，就像FORTRAN语言那样，可以固定每列输出多少值，这样就可以设置一个范围，就基本实现分列输出的想法。是不是VB没有这种格式控制的方法啊？

追答

怎么会没有呢？
关键是，任何一种高级程序语言，是无法知道：
对于
上海29度雨不适宜出行

这样一行文本，如何断开分列呀？
我现在只有想到：
比如：
第1 找数字，断开，然后找“度”断开，最后找“不适宜”或“适宜”断开
假设，你每行文本，都是这个规律的话，是可行的。
VB有函数Instr()，Left()，Right()，Mid()
dim
dim s1 as string
dim L as integer
dim i as integer
dim N as integer
s1 ="上海29度雨不适宜出行"
L = Len(s1)
'寻找数字
for i = 1 To L
if mid(s1,i,1)>="0" And mid(s1,i,1)<= "9" then
n = i
exit for
end if
next i
'分离出城市

print Left(s1,n-1)

'下面略了