不确定我是否做错了什么,基本上我的代码从“111111111”开始,并且每次线程能够通过将“1”添加到原始数字来进行计数。我希望该方法在序列中跳过 0,而不是在“111111119”之后转到“111111120”,我希望它直接转到“111111121”。
Private Sub IncreaseOne()
If count < 999999999 Then
count += 1
Else
done = True
End If
If CStr(count).Contains("0") Then
MsgBox("theres a 0 in that...darn.")
CStr(count).Replace("0", "1")
End If
End Sub
*注意,我的消息框会显示,但是,0 不会更改为 1