展开全部
可以选择性使用LTrim, RTrim, Trim, Replace这些函数来处理字符串中的空格
LTrim(" abc") '去掉左侧的空格
RTrim("abc ") '去掉右侧的空格
Trim(" abc ") '去掉两侧的空格
Replace(" a b c ", " ", "") '去掉全部空格(含字符串中间的空格)
LTrim(" abc") '去掉左侧的空格
RTrim("abc ") '去掉右侧的空格
Trim(" abc ") '去掉两侧的空格
Replace(" a b c ", " ", "") '去掉全部空格(含字符串中间的空格)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如果只是字符串左端或右端有空格的话,可以用Trim函数,
例如 str = Trim(str),当str = " abc " 时,返回值为 str = "abc"。
如果不确定哪儿有空格,可以用下面的方法:
Private Sub Command1_Click()
Dim MyStr As String
Dim MyChar As String
For i = 1 To Len(Text1.Text)
MyChar = Mid(Text1.Text, i, 1)
If MyChar <> " " Then MyStr = MyStr & MyChar
Next
Text1.Text = MyStr
End Sub
'你也可以定义成函数,稍微变通一下就行了,不懂问我
'VB6.0测试通过
例如 str = Trim(str),当str = " abc " 时,返回值为 str = "abc"。
如果不确定哪儿有空格,可以用下面的方法:
Private Sub Command1_Click()
Dim MyStr As String
Dim MyChar As String
For i = 1 To Len(Text1.Text)
MyChar = Mid(Text1.Text, i, 1)
If MyChar <> " " Then MyStr = MyStr & MyChar
Next
Text1.Text = MyStr
End Sub
'你也可以定义成函数,稍微变通一下就行了,不懂问我
'VB6.0测试通过
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询