怎样把matlab程序改为vb程?怎样把matlab程序改为vb’Y(2)=3。8’Y(3)=10。5’Y(4)=2。7’Y(5)=0。2sum=0Fori=1To5sum=sum+CSng(Y(i))NextIf
怎样把matlab程序改为vb程?怎样把matlab程序改为vb
‘Y(2) = 3。8
‘Y(3) = 10。5
‘Y(4) = 2。7
‘Y(5) = 0。2
sum = 0
For i = 1 To 5
sum = sum + CSng(Y(i))
Next
If sum = 0 Then
Gray = “数据异常,无法得出结论!”
Exit Function
End If
For i = 2 To 5
Y(i) = 100 * CSng(Y(i)) / (sum – CSng(Y(1)))
Next
Y(1) = 100 * CSng(Y(1)) / sum
‘————————————————-
‘——计算灰色关联系数—————————-
‘计算Dmin/Dmax/Dik
Dmin = 100
Dmax = 0
sum = 0
For i = 1 To 55
For k = 1 To 5
dik(k, i) = Abs(CSng(X(i)(k)) – Y(k))
sum = sum + dik(k, i)
If dik(k, i) >= Dmax Then
Dmax = dik(k, i)
End If
If dik(k, i) mmm Then
mmm = d0(m + k)
End If
Next
epsita(i) = mmm
Next
sorted = sort(epsita)
Gray = XX(sorted(1, 2)) & ” 关联度:” & Format(sorted(1, 1), “0。
如何将matlab程序打包图?如何将matlab程序打包图解
??exe,它显示:this application has requested the Runtime to terminate it in an unusual way。这个可能是哪里出错了呢?
Solution:
The segmentation violation can be caused due to a corruption in either the profile of the current user or by corrupted Windows libraries。
如若转载,请注明出处:https://www.mcustudio.com/32340.html