如何把常量放到字符串中去组成新的字符串

[duye]

有一个string的变量和一个Private Const cintCreateFile As Integer = 1的常量
如何把常量放到string的变量中组成一个新串

直接组合的话提示类型不匹配，如何用一个常量生成一个string串

[syh0107]

Private Const cintCreateFile As Integer = 1
Private str As String

Private Sub Command1_Click()

str = "asdfasf"
str = str & cintCreateFile

End Sub

[miky]

Option Explicit
Private Const cintCreateFile As Integer = 1
Private TempStr As String
Private Sub Command1_Click()

TempStr = "Hello"
TempStr = TempStr & Trim(Str(cintCreateFile))
Text1.Text = TempStr

End Sub

[duye]

谢谢