如何去掉文本中的TAB?

Question

比如说我有一篇文章,需要把TAB替换成空格, 但是格式还是不变,比如:
"WWW WWW"替换后还是一样,只是空白部分全部变成空格了.
现在有个问题是,TAB有长有短,比如: 当TAB的长度相当与8个空格的时候,如果先输入3个字母,再按TAB的话,光标就会往右移5个字母位置, 如果先输4个的话,就会右移4个...
怎样解决?

Answer 1

TAB有长有短?s = Replace(s, vbTab, " ")
s为字串

Answer 2

从外观上看是这样的, 好象可以认为有长短,你可以试一下比较先输入1个字符再按TAB和先输入2个字符再案TAB的异同.(选中TAB可以看到长度是不一样的)

Answer 3

看起来是这样。对于程序来说还是一个tab。因为tab是制表符。

Answer 4

是啊,那怎样实现我说的那种效果呢? 把TAB换成相应可视长度的空格?

Answer 5

Dim a(8) As String
Dim s As String
Private Sub Command1_Click() ' string with vbtab
For i = 0 To 8
a(i) = String(Int(Rnd * 5 + 1), "a")
Next
s = Join(a, vbTab)
Print s
End SubPrivate Sub Command2_Click() 'replace vbtab
Dim temp
temp = Split(s, vbTab)
For i = 0 To UBound(temp)
temp(i) = Left(temp(i) & Space(8), 8)
Next
s = Join(temp, "")
Print s
End SubPrivate Sub Form_Load()
Me.WindowState = 2
End Sub