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

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/06 04:59:41

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

vb 计算90°角正弦结果为 .893996663600558程序是这样,Private Sub Command1_Click()Dim a As Singlea = CSng(Text1.Text)MsgBox "计算结果为:" & Sin(a)End Sub
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