VB中,在文本框中输入弧度值,将弧度值换算为角度值的形式,然后输出例如弧度值为1.202320233,1.要求先将弧度值变成十进制数,即84.20232023；2.去掉整数部分84,余0.20232023；3.0.20232023*60=30.202399；4.去

问题：VB中,在文本框中输入弧度值,将弧度值换算为角度值的形式,然后输出例如弧度值为1.202320233,1.要求先将弧度值变成十进制数,即84.20232023；2.去掉整数部分84,余0.20232023；3.0.20232023*60=30.202399；4.去

答案：↓↓↓

孙景燕的回答：

网友采纳　　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　　换算公式有点乱你自己看看