已知直角三角形的三边求锐角 直角三角形中 已知两直角边 高为32 和 底边为64 斜边 b=sqr(32^2+64^2)求高(32)所对的锐角 角度. 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Const pi = 3.14159Private Sub Form_Load()Dim a, b As Doublea = Atn(32 / 64) / pib = 180 * aMsgBox "高(32)所对的锐角为" & b & "度"End Sub a的弧度已经除了pi,应该是以pi为单位,不除就是弧度,除pi是为了算角度 b是什么角度?是不是弄错了,,,就是a=abs(atn(32/64))就可以了吧,如果要求弧度再乘以 pi/180 如何使用ShowWindow函数循环激活多个程序窗口,会的进来帮一下,谢谢 如何用API加载"C:\A.ICO"图标? 指定的字符串不符合OLE DB的规定,高手 帮帮忙啊,谢谢拉 怎样用 MSComm 判断串口设备是否存在呢 哪里有背景透明的VB按钮源代码(SSCOMMAND有BUG除外)?急。 关于水晶报表9的问题,在线等 关于textbox控件 关于系统热键问题,奉送100分 请问:如何在“ADODC”中指定数据库的相对路径??? 请大家帮帮忙! 关于面向对象编程的问题 如何调整gif图片的大小和截取视频文件的一部分(高手请进)
Private Sub Form_Load()
Dim a, b As Double
a = Atn(32 / 64) / pi
b = 180 * aMsgBox "高(32)所对的锐角为" & b & "度"
End Sub
就是a=abs(atn(32/64))就可以了吧,如果要求弧度再乘以 pi/180