VB中,在文本框中输入弧度值,将弧度值换算为角度值的形式,然后输出例如弧度值为1.202320233,1.要求先将弧度值变成十进制数,即84.20232023;2.去掉整数部分84,余0.20232023;3.0.20232023*60=30.202399;4.去
<p>问题:VB中,在文本框中输入弧度值,将弧度值换算为角度值的形式,然后输出例如弧度值为1.202320233,1.要求先将弧度值变成十进制数,即84.20232023;2.去掉整数部分84,余0.20232023;3.0.20232023*60=30.202399;4.去<p>答案:↓↓↓<p class="nav-title mt10" style="border-top:1px solid #ccc;padding-top: 10px;">孙景燕的回答:<div class="content-b">网友采纳 privatesubcommand1_click() dima,a1,a2,a3 constPI=3.141592653589793 a=180*text1.text/PI a1=INT(a) a2=INT((a-a1)*60) a3=INT(((a-a1)*60-a2)) msgbox"角度为:"&a1&"°"&a2&"′"&a3&"〃" endsub privatesubform1_load() command1.caption="转换角度" text1.text="" endsub 换算公式有点乱你自己看看
页:
[1]