VBA字符串拼接有关问题

VBA字符串拼接问题
Dim entity as string
For j = 1 To 204
        If Me.OLEObjects("CheckBox" & j).Object.Value = True Then
            entity = entity & CStr(Me.OLEObjects("CheckBox" & j).Object.Caption) & ";"
        End If
 Next j

代码是这样的，但是CStr(Me.OLEObjects("CheckBox" & j).Object.Caption) & ";" 都拼接不起来，直接用
entity = CStr(Me.OLEObjects("CheckBox" & j).Object.Caption) & ";"  后面的";"还是拼接不起来，那些大侠以前碰到过，跪求解决方案，谢谢了
[解决办法]
拼接不起来是什么意思？
没有报错吗？