A. vb文本框里有空格怎么去掉。
你看看你的属性值里的txt是不是有个空格。或者就是你的。text=“”；这里面有个空格， 你可以好好检查下
B. 用vb怎样删除文本每行前面的空格
Private Sub Command1_Click()
'仅去掉每一行前面的空格
Dim ary() As String
Dim i As Long
Me.List1.Clear
ary = Split(Me.Text1.Text, vbCrLf)
Text1 = ""
For i = LBound(ary) To UBound(ary)
Text1 = Text1 & LTrim(ary(i)) & vbCrLf
Next
End Sub
Private Sub Command2_Click()
'去掉全部空格
Text1.Text = Replace(Replace(Text1.Text, vbTab, ""), " ", "")
End Sub
Private Sub Command3_Click()
'去掉所有空行
Do While InStr(Text1.Text, vbCrLf & vbCrLf) > 0
Text1.Text = Replace(Text1.Text, vbCrLf & vbCrLf, vbCrLf)
Loop
End Sub
Private Sub Form_Load()
'在text1中产生几个有前导空格的数据。
For i = 1 To 10
Text1 = Text1 & Chr(13) & Chr(10) & String(Int(Rnd * 5), " ") & 5 * i & "，"
Next i
End Sub
C. 用VB编程，去掉文本框中数据间的空格
我有一个思路
把文本框的文本一个字符一个字符的判定，是空格键的一概删除
dimstrasstring,Tstrasstring,ttstrasstring
tstr=text1.text'读文本
dimiasint
iflen(str)<1then'判断文本长度
exitif'无文本，不执行操作
else
fori=1tolen(str)'逐个字符判断
str=mid(tstr,i,1)'取第i个字符
ifstr=""then
exitif'空格不操作
else
ttstr=ttstr&str'不是空格连接字符至变量ttstr
endif
nexti
endif
text1.text=ttstr'文本框返回最后不是空格的所有字符
D. VB 如何去掉一个字符串中的空格
可以使用replace函数去除字符串中的空格
例如：
Private Sub Command12_Click()
MsgBox Replace("中华 人 民共 和 国 ", " ", "")
End Sub
将弹出消息框显示：“中华人民共和国”
E. vb去除所有空格如何实现
使用记事本的替换功能即可，“查找”框中输入一个空格，“替换”框中不输入任何字符，点击“替换全部”。
F. vb 删除文本框每行开头的空格和结尾的空格怎么弄
vb 删除文本框每行开头的空格和结尾的空格怎么弄？
如果是多行文本框，直接用替换函数即可：
text1=replace(text1," ","") '将空格替换,text1控件是多行文本框，存放你上面说的内容。
谢谢您的支持，有任何疑问欢迎您再次通过此渠道提问，让大家共同解决，共同进步！
以上回答仅为“网络规则”，没有任何违法行为，请楼主采纳，谢谢！
G. vb中,去掉一个字符串中的所有空格怎么写
Ltrim(X),Rtrim(X),Trim(X) :去掉空字符。
Ltrim(x) 去掉X左边的所有字符。
trim(x) 去掉X左右边的所有字符
Rtrim(x) 去掉X右边的所有字符。
字符与字符间的空格不会被去掉。
X=Ltrim(“ This is good “)
结果：X=“This is good “
X=Trim(“ This si good “)
结果:X=”This is good”
H. VB 去除字符串中的空格
'此函数KillSpace用以除去字符串中的空格，请将此函数粘贴到代码窗口空白处。（不在任何Sub过程里）Function KillSpace(Expression)
Dim tmpS
For i = 1 To Len(Expression)
tmpT = Mid(Expression, i, 1)
If tmpT <> " " Then tmpS = tmpS & tmpT
Next i
KillSpace = tmpS
End Function'在某个过程里调用此函数，例如：Private Sub Command1_Click()Text1.Text=KillSpace("7 591 6512 1458 050")End Sub'这样在Text1里就显示：759165121458050