正弦30度等于二分之一。
舞陽ssl適用于網站、小程序/APP、API接口等需要進行數據傳輸應用場景,ssl證書未來市場廣闊!成為創新互聯建站的ssl證書銷售渠道,可以享受市場價格4-6折優惠!如果有意向歡迎電話聯系或者加微信:18982081108(備注:SSL證書合作)期待與您的合作!
正弦值在數值上等于直角三角形中一個銳角的對邊/斜邊。在單位圓中,將x軸逆時針旋轉30度后交圓上一點,在該點向x軸作垂線,測得垂線的長度是單位圓半徑的二分之一。同時,在我們熟悉的30度、60度、90度的三角板中,其中30度所對應的邊與斜邊的比值為二分之一。因此,30度正弦值為二分之一。
vb使用弧度來表示角度:在計算中必須轉換:
private
sub
command1_click()
const
pi
=
3.141592654
dim
jd
as
single
dim
srjd
as
single
srjd
=
30
jd
=
30
/
180
*
pi
format(sin(jd),
"#.0000")
end
sub
為什么我的不是?
Dim?pi
pi?=?3.1415926
Dim?a
a?=?30
Text1.Text?=?Sin(a?*?pi?/?180)
Private Sub Command1_Click()
Dim B As Single
B = (Val(Text1.Text)) * 3.14 / 180
MsgBox "指定角度的正弦值為:" sin1(B)
End Sub
Public Function sin1(a As Single)
sin1 = Sin(a)
End Function
修改后的代碼,
希望對你有所幫助,
期待被采納。
你問的是不是角度?如果是,答案如下
VB關于角度的計算采用的是弧度,我們常說的360度(一個圓周),VB計為2*3.1415926個弧度,也就是說.1度應該為3.1415926/180.例:
計算30度的正弦值
Private Sub Command1_Click()
Dim a As Double
Dim sa As Double
a = 30
sa = Sin(a * 3.1415926 / 180)
Print Format(sa, "0.00")
End Sub
結果為 0.50