Hallo erstmal an alle,
ich bin ein absoluter Neuling auf dem Gebiet der VB-Programmierung, versuche aber mein Bestes ;).
Mein Problem ist derzeit, dass eine programmierte Schleife endlos läuft und ich nicht verstehe warum.
Der Programmteil sieht wiefolgt aus:
Wo liegt der Fehler?
Also im Grunde will ich einfach nur werte über 100 zulassen. Evtl. gibt es ja auch einfachere Möglichkeiten.
LG charlsten
ich bin ein absoluter Neuling auf dem Gebiet der VB-Programmierung, versuche aber mein Bestes ;).
Mein Problem ist derzeit, dass eine programmierte Schleife endlos läuft und ich nicht verstehe warum.
Der Programmteil sieht wiefolgt aus:
Visual Basic-Quellcode
- Dim length1 As Dimension
- Set length1 = parameters1.CreateDimension("", "LENGTH", 0.000000)
- length1.Rename "Achsabstand"
- Dim Test
- Test=True: Achsabstand=0
- Do
- Do While Achsabstand <100
- length1.Value = InputBox("Geben sie den Achsabstand ein (mind. 100mm)" , "Eingabe Achsabstand", Achsabstand)
- If Achsabstand > 99 Then
- Test= False
- Exit Do
- End If
- Loop
- Loop Until Test= False
Wo liegt der Fehler?
Also im Grunde will ich einfach nur werte über 100 zulassen. Evtl. gibt es ja auch einfachere Möglichkeiten.
LG charlsten
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „charlsten“ ()