1

私が何か間違っているかどうかはわかりませんが、基本的に私のコードは「111111111」から始まり、スレッドができるたびに元の番号に「1」を追加してカウントアップします。「111111119」の後に「111111120」に移動する代わりに、「111111121」に直接移動したいのですが、シーケンス内の0をスキップするメソッドが必要です。

    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 に変更されません

4

2 に答える 2