我的部分随绳索的直径而变化。定义了绳索范围和几何参数。但是一个参数必须是可编辑的。我想提供一组默认值,但是我可以自行决定更改所需的参数或将其保留不变。这是一段代码:
Select Case dk
Case "From 3 to 3,7"
B = 6
B1 = 13
hк = 5
R = 2
Case "From 3,7 to 4,6"
B = 8
B1 = 15
hк = 6
R = 2.5
Case "From 4,6 to 5,6"
B = 9
B1 = 16
hк = 7
R = 3
Case "From 5,6 to 7,2"
B = 12
B1 = 19
hк = 9
R = 4
End Select
要更改的值为B1。实际上,该值不应小于或等于B。因此,我对B1在范围内变化的解决方案感到满意。预先感谢您在此问题上的帮助。
更多使用两个参数。 B1max(B1的最大值)和B1req(B1的请求值)。在您的代码中设置B1max而不是B1。用户或其他iLogic代码可以将参数B1req设置为任何值。
对于参数B1,使用表达式“ min(max(B; B1req); B1max)”。现在,B1参数值只能在B到B1max范围内,并且在可能的情况下等于B1req。
Select Case dk
Case 3 to 3.7 '"From 3 to 3,7"
B = 6
B1max = 13
hk = 5
R = 2
Case 3.7 To 4.6 '"From 3,7 to 4,6"
B = 8
B1max = 15
hk = 6
R = 2.5
Case 4.6 To 5.6 '"From 4,6 to 5,6"
B = 9
B1max = 16
hk = 7
R = 3
Case 5.6 To 7.2 '"From 5,6 to 7,2"
B = 12
B1max = 19
hk = 9
R = 4
Case Else
Logger.Error("Parameter 'dk' is out of range")
End Select
Logger.Debug("B = " & B)
Logger.Debug("B1max = " & B1max)
Logger.Debug("hk = " & hk)
Logger.Debug("R = " & R)