vb 关于循环
发布网友
发布时间：2022-04-22 01:36
共1个回答
热心网友
时间：2024-01-02 10:33
e的值你没初始化。
你在
For x = 1 To Len(Dl)
For k = 1 To Len(rl)
If Mid(rl, k, 1) = Mid(Dl, x, 1) Then e = e + 1
Next
Next
之前初始化以下 e 的值
e=0
For x = 1 To Len(Dl)
For k = 1 To Len(rl)
If Mid(rl, k, 1) = Mid(Dl, x, 1) Then e = e + 1
Next
Next
...
同样，你的a,b,之类的 也得初始化
另外，我发现你发的这段代码里最后面是不是多了一个next？
