Vb.net 当计数器为3、6、9、12……99时,我想弹出一个MsgBox

Vb.net 当计数器为3、6、9、12……99时,我想弹出一个MsgBox,vb.net,Vb.net,我想在计数器为3、6、9、12…….99时弹出一个MsgBox 以下代码需要重新编写 Dim Counter As Integer Do While Counter Is threefold MsgBox("Hello") Counter = Counter + 1 Loop 你必须使用Mod操作符 我不知道什么是三重的,但是你可以测试这个循环: For i As Integer = 0 To 99 If i > 0 The

我想在计数器为3、6、9、12…….99时弹出一个MsgBox

以下代码需要重新编写

    Dim Counter As Integer
    Do While Counter Is threefold
        MsgBox("Hello")
        Counter = Counter + 1
    Loop

你必须使用Mod操作符

我不知道什么是三重的,但是你可以测试这个循环:

For i As Integer = 0 To 99
    If i > 0 Then
        If i Mod 3 = 0 Then
            MsgBox(i)
        End If
    End if
Next
编辑:如鲁本斯所述,这也是可能的:

For i As Integer = 3 To 99 Step 3
    If i Mod 3 = 0 Then
        MsgBox(i)
    End If
Next

假设99是你的极限,使用下面的mod将有所帮助

Mod使您能够找到一个数字的除数,因为余数总是0。(在您的情况下,您的目标是'Mod 3')

Dim计数器为整数=1
而计数器<100
如果(计数器模块3)=0,则
MsgBox(“你好”)
如果结束
计数器+=1
结束时
在这里拉小提琴:


另一种方法是使用For循环-这将省去声明计数器的需要并记住在循环中递增

您正在寻找“mod”操作符(Google this:))谢谢,解决了。谢谢。已解决。您可以从3开始,然后使用选项。这不起作用。如果计数器=0,则显示Hello
,在问题中,它从3开始,非常正确。将初始计数器值更改为1可以防止出现这种情况(如果确实不需要的话)。希望他的计数器不会从0开始:)@Greaterix
Dim counter As Integer = 1
While counter < 100
   If (counter mod 3) = 0 Then
      MsgBox("Hello")
   End If
   Counter += 1
End While