度分秒转化成弧度的函数代码Public Function RAD(ByVal DEGREE As String) As DoubleDim G As StringDim G1 As DoubleDim d As BooleanDim DEG11 As DoubleDim DEG12 As DoubleDim DEG13 As DoubleDEGREE = DEGFORMAT(DEGREE)G = Left(Trim(Left(DEGREE, 3
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/30 15:52:00
度分秒转化成弧度的函数代码
Public Function RAD(ByVal DEGREE As String) As Double
Dim G As String
Dim G1 As Double
Dim d As Boolean
Dim DEG11 As Double
Dim DEG12 As Double
Dim DEG13 As Double
DEGREE = DEGFORMAT(DEGREE)
G = Left(Trim(Left(DEGREE, 3)), 1)
If G = "-" Then
G1 = -1
ElseIf G = "+" Then
G1 = 1
Else
G1 = 1
End If
DEG11 = Abs(Val(Left(DEGREE, 4)))
DEG12 = Val(Mid(DEGRE, 6, 2))
DEG12 = Val(Mid(DEGRE, 6, 2)) / 60
DEG13 = Val(Right(DEGREE, Len(DEGREE) - 8)) / 3600
RAD = G1 * (DEG11 + DEG12 + DEG13) * PI() / 180
End Function
上面这段代码里面,DEGREE = DEGFORMAT(DEGREE)这一句是什么意思?怎么理解?
DEGREE = DEGFORMAT(DEGREE)
这是一个赋值语句,就是把DEGREE作为函数 DEGFORMAT的参数,调用DEGFORMAT,最后把得到的值赋给DEGREE
度分秒转化成弧度的函数代码Public Function RAD(ByVal DEGREE As String) As DoubleDim G As StringDim G1 As DoubleDim d As BooleanDim DEG11 As DoubleDim DEG12 As DoubleDim DEG13 As DoubleDEGREE = DEGFORMAT(DEGREE)G = Left(Trim(Left(DEGREE, 3
c语言编程:输入一个弧度,转化成度分秒输出,秒保留一位小数,
31.34度转化成度分秒是多少?
32.41度转化成度分秒
测量平差中将度分秒系统转化为弧度系统时在各种情况下如何转化?
把38.171转化度分秒的形式是
CAD里面如何把度转化成度分秒
1,将弧度为1.474919573的值换算为角度值(度分秒)的形式
度如何转化成分秒100.55度转化成多少分秒,
弧度制 用度分秒表示;57.3°3/π弧度= 度弧度制 用度分秒表示;57.3°3/4π弧度= 度
EXCIL怎样将弧度转换为度分秒?就是在表格直接显示度分秒.
弧度制的定义,转化
角度如何转化成弧度
角度如何转化成弧度?
excel中如何把度分秒转化成度?能不能有简单一点的办法?跪谢!要求1:度分秒只能在同一个单元格,不能分成3个单元格分别输入,因为这个方法我知道2:用left len mid value函数的方法我也知到=VALUE
求帮忙用c++写角度不同格式的度分秒,小数,弧度的转换.谢谢了,在线等,急用
60度角转化为弧度制的是?rad
度分秒的换算