vb 计算90°角正弦结果为 .893996663600558程序是这样,Private Sub Command1_Click()Dim a As Singlea = CSng(Text1.Text)MsgBox "计算结果为:" & Sin(a)End Sub
来源:学生作业帮助网 编辑:作业帮 时间:2024/09/30 22:59:56
x)+KRxnu-
mx|ҳY|g<ٱKAXbge%*&)8&;d&gkhd*$*8+g&**8kVHMt
%Z))ti$j楀I*'ٱ`M`1lnK Xv6C,Ћ3,
l
l|+`<`A)<@sQd[rVA$rӓ@ӆ=0&nqAb( )
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