其实圆周率无需自己指定的，VB 有函数可以计算：pi = 4 * Atn(1)
比顷拦稿如 45 度雀孝转衡者换为弧度：
Private Sub Command1_Click()
Print 45 * 4 * Atn(1) / 180
End Sub
你要的代码是这样的,你自己试州宏枝试!!!
Private Sub Command1_Click()
Dim num
Const PI = 3.1415926
num = InputBox("请输入一个角度值:", "绝拍输入角度值")
MsgBox num * (PI /册敏 180)
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024