题目

vb 计算90°角正弦结果为 .893996663600558
程序是这样,Private Sub Command1_Click()
Dim a As Single
a = CSng(Text1.Text)
MsgBox "计算结果为:" & Sin(a)
End Sub

提问时间：2021-03-31

答案

sin90=1
Private Sub Command1_Click()
Dim a As Single
pi=3.141592625
a = val(Text1.Text)
b=sin(a*pi/180)
msgbox "正弦值为:" & b
End Sub