VB中去除字符中间的空格

Public Function ReplaceSpace(ByVal str As String) As String
Dim i As Integer
i = InStr(str, " ")
Do While i  0 Then
    str = Replace(str, " ", "")
End If
Loop
ReplaceSpace = str
End Function
阅读更多
个人分类: QB/VB
上一篇C语言中常用的两种排序法(冒泡法/插入法)
下一篇ADSL无需拨号,直接上网之e-tek 2001系列MODEN详解
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

关闭
关闭