vb.net计算弧度 vb中角度怎么输入( 三 )


Dim ReturnValue() As Variant
ReDim ReturnValue(2)
ReturnValue(0) = Fix(Second / 3600)
ReturnValue(1) = Fix((Second - Degree * 3600) / 60)
ReturnValue(2) = Fix((Second - Degree * 3600) - Minute * 60)
SecondToDegree = ReturnValue
End Function
然后,进行操作 , 例如:
Dim RV() As Variant
RV = SecondToDegree(DegreeToSecond(45, 23, 56) + DegreeToSecond(67, 45, 12))
MsgBox "Result:"RV(0)"°"RV(1)"'"RV(2)""""
如果是在 VB.NET 中,把所有的 Variant 参数和没有带类型的参数(在 VB6 中默认为 Variant)声明为 Object 类型即可
【vb.net计算弧度 vb中角度怎么输入】vb.net计算弧度的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于vb中角度怎么输入、vb.net计算弧度的信息别忘了在本站进行查找喔 。

推荐阅读