Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 5692|回复: 2

[已解决] 求大神帮助,用vba语句编写一个程序,计算圆的面积,

[复制链接]
发表于 2013-11-24 12:09 | 显示全部楼层 |阅读模式
 求大神帮助,用vba语句编写一个程序,计算圆的面积,我一窍不通,。恳求各路大神帮助,,
帮帮小女子,十分感谢,是数据库作业来的。{:24:}
最佳答案
2013-11-24 12:24

Sub 圆面积()
Const Pi As Single = 3.1415
Dim R
R = InputBox("请输入圆半径", "圆面积计算", 10)
MsgBox Pi * R ^ 2
End Sub
发表于 2013-11-24 12:24 | 显示全部楼层    本楼为最佳答案   

Sub 圆面积()
Const Pi As Single = 3.1415
Dim R
R = InputBox("请输入圆半径", "圆面积计算", 10)
MsgBox Pi * R ^ 2
End Sub

点评

再考虑下输入非法的情况,没有点确定的情况。  发表于 2013-11-24 13:21
回复

使用道具 举报

 楼主| 发表于 2013-11-24 20:58 | 显示全部楼层
我心飞翔410 发表于 2013-11-24 12:24
Sub 圆面积()
Const Pi As Single = 3.1415
Dim R

感谢大神
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-15 11:55 , Processed in 0.273805 second(s), 17 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表