部分代码如下：
For i = 1 To DotNum
fai = i * PI / 180
'0度到46度
If fai > 0 And fai <= 136 * PI / 180 Then
S(i) = 0
V(I)=方程
A(I)=方程
J(I)=方程
End If
'46度到96度
If fai > 136 * PI / 180 And fai <= 176 * PI / 180 Then
S(i) = 0
V(I)=方程
A(I)=方程
J(I)=方程
End If
'96度到200
If fai > 176 * PI / 180 And fai <= 200 * PI / 180 Then
S(i) = 0
End If
'200度到220度
If fai > 200 * PI / 180 And fai <= 220 * PI / 180 Then
S(i) = ψ1 + ψ2 * ((fai - 200 * PI / 180) / (20 * PI / 180) - Sin(2 * PI * (fai - 200 * PI / 180) / (20 * PI / 180)) / (2 * PI))
V(I)=方程
A(I)=方程
J(I)=方程
End If
'220度到238度
If fai > 220 * PI / 180 And fai <= 285 * PI / 180 Then '远休止角2
'S = ψ1 + ψ2
S(i) = 0
V(I)=方程
A(I)=方程
J(I)=方程
End If
'238度到285度
If fai > 285 * PI / 180 And fai <= 330 * PI / 180 Then
'S(i) = -ψ3 * (1 - (((fai - 285 * PI / 180) / (45 * PI / 180)) - (1 / (2 * PI)) * (Sin(2 * PI * (fai - 285 * PI / 180) / (45 * PI / 180)))))
S(i) = 0
V(I)=方程
A(I)=方程
J(I)=方程
End If
'285度到360度
If fai > 330 * PI / 180 And fai <= 360 * PI / 180 Then
S(i) = 0
V(I)=方程
A(I)=方程
J(I)=方程
End If
现在  S  V A  J  分别在不同的区间,如何把每段的数据连接起来,具体要求见附件

[此贴子已经被作者于2022-3-17 21:47编辑过]

工程文件附件和完整要求说明发上来，太大的话发Q1975382969