Private Sub Command1_Click()
Text1 = Cos(4)'为-0.653643620863612
End SubPrivate Sub Command1_Click()
Text1 = Sin(4)'为-0.756802495307928
End Sub计算器:
sin(4)=0.0697564...cos(4)=0.997564...还请较为和,谢谢!!!