去掉空格后连接二个数字成字符类

问题如下：

dim i as integer
dim s as string
i=1
s="05555555"+str(i)
's=0555555 1
s="0555555"&str(i)
's=0555555 1
解决方法：

一、Private Sub Command1_Click()
    Dim i As Integer
    Dim s As String
   
    i = 1
    's=0555555 1
    s = "0555555" & Trim(Str(i))
   
    Debug.Print s
End Sub

 

 

二、Private Sub Command1_Click()
    Dim i As Integer
    Dim s As String
    s = "0555555" & i
    Print s
End Sub

 

 

三、Dim i As Integer
Dim s As String
i = 1
s = "05555555" & CStr(i)