Wenn Sie anstatt schlingen möchten, dann können Sie den Code verwenden, den Sie im Initialisierungsunterseeboot bekannt gaben, aber Sie wünschen nicht x + 1, Sie wünschen x:
1: 2: 3: 4: 5: 6: 7: 8:
Privates VorUserForm_Initialize () Schwaches x als lang Mit Me.DaysOfSupply Für x = 1 bis 100 .AddItem x Folgendes x Ende mit Enden-Unterseeboot