Hallo,
bräuchte Hilfe für folgende Schleife.
Irgendwie bekomme ich diese nicht hin.
Der Winkel Beta soll ausgegeben werden, sobald das Produkt der beiden Formeln gleich einem vorgegebenem Wert (Zylinderhub) ist.
For Beta = 0 To 90 Step 0.1
Hub1 = Sqr((Scherenschenkel / 2) ^ 2 + Abstand ^ 2 - (Scherenschenkel / 2) * 2 * Abstand * Cos(Beta + 2 * Alpha1))
Hub2 = Sqr((Scherenschenkel / 2) ^ 2 + Abstand ^ 2 - (Scherenschenkel / 2) * 2 * Abstand * Cos(Beta + 2 * Alpha2))
DeltaHub = Hub2 - Hub1
If DeltaHub = Zylinderhub Then
Text8 = Beta
End If
Next
Vielen Dank!
bräuchte Hilfe für folgende Schleife.
Irgendwie bekomme ich diese nicht hin.
Der Winkel Beta soll ausgegeben werden, sobald das Produkt der beiden Formeln gleich einem vorgegebenem Wert (Zylinderhub) ist.
For Beta = 0 To 90 Step 0.1
Hub1 = Sqr((Scherenschenkel / 2) ^ 2 + Abstand ^ 2 - (Scherenschenkel / 2) * 2 * Abstand * Cos(Beta + 2 * Alpha1))
Hub2 = Sqr((Scherenschenkel / 2) ^ 2 + Abstand ^ 2 - (Scherenschenkel / 2) * 2 * Abstand * Cos(Beta + 2 * Alpha2))
DeltaHub = Hub2 - Hub1
If DeltaHub = Zylinderhub Then
Text8 = Beta
End If
Next
Vielen Dank!