Вложенный l oop для VB.Net - PullRequest
Новая
       13

Вложенный l oop для VB.Net

0 голосов
/ 24 февраля 2020

В VB. NET Я хочу напечатать числа так, чтобы каждый раз, когда внутренний l oop заканчивался до 4, внешний l oop должен увеличиваться на 1 соответственно. как: 

y:0
Z:0
Z:1
Z:2
Z:3
Z:4


y:0
y:1
Z:0
Z:1
Z:2
Z:3
Z:4

y:0
y:1
y:2
Z:0
Z:1
Z:2
Z:3
Z:4

мне нужен код Dynami c, потому что Y и Z являются входными данными. Даже не догадываясь, как построить такое l oop.

РЕДАКТИРОВАТЬ: к тому времени, как у заканчивает свой предел, l oop должен быть остановлен. у не должно превышать z. Любые два цикла нужно использовать только для этого, потому что в какой-то момент мне нужно сравнить значение y с z и найти, сколько повторяющихся значений существует в y

Ответы [ 2 ]

0 голосов
/ 24 февраля 2020

Попробуйте это: 

For x = 0 To 2
    For y = 0 To x
        Console.WriteLine("y:{0}", y)
    Next
    For z = 0 To 4
        Console.WriteLine("Z:{0}", z)
    Next
    For i = 1 To 2 - x
        Console.WriteLine()
    Next
Next

Это дает мне это: 

y:0
Z:0
Z:1
Z:2
Z:3
Z:4


y:0
y:1
Z:0
Z:1
Z:2
Z:3
Z:4

y:0
y:1
y:2
Z:0
Z:1
Z:2
Z:3
Z:4
0 голосов
/ 24 февраля 2020

Я написал это в VB6. Посмотрите, поможет ли это вам перевести его на vb. net

Sub test()
Dim y As Integer
Dim y2 As Integer
Dim z As Integer

y = 5
y2 = 0

Do While y2 < 5
    y = 0
    For y = 0 To y2
        Debug.Print "y:" & y
    Next
    For z = 1 To 4
        Debug.Print "z:" & z
    Next
    y2 = y2 + 1

Loop
End Sub
...