Question

想让VB中text中输出的数每四个位数后加一个空格该怎么做？

Answer 1

不知道你要怎么输出？是要把输出到TextBox中的文本处理一下，还是从别处输出到TextBox中。不管哪种啊，循环一下就出来了，只是代码的位置不同。

Answer 2

假设num为要输出的数
dim s() as string *4
string1=str(num)
redim s(int(len(string1)/4+1)) as string*4
text=join(s," ")

Answer 3

for i = 1 to len(text1.text)
if i mod 4=0 then s=s & " " else s=s & mid(text1.text,i,1)
next
text1.text=s