急求:后面的sr初始值是多少?
Function sr(ByVal zh As String) As String
Dim wz, x As Double
wz = 1: x = 1
Do Until wz = 0
wz = InStr(x, sjk, zh)
If wz > 0 Then sr = sr + CStr(wz) + " ": x = wz + 1
Loop
sr = Trim(sr)
End Function
其中 sr = sr + CStr(wz) + " " 实现的什么功能?
若用 sr = CStr(wz) + " " 最终的值又有什么区别?请高手赐教?
[解决办法]
最好的方法就是试验一下
两个的区别就是前者sr在不断原有的基础上不断加长append的作用,后者是赋值
[解决办法]
写个小循环楼主就看出来了:
str=0
for i=0 to 2
str=str+1
next
for i=0 to 2
str=1
next
[解决办法]
sr= " "