Dim r As Integer
Private SubCommand1_Click()
r =Val(InputBox("请输入半径", "输入框"))
Print
Print
Print
Print Space(5);"半径" & r
End Sub
Private SubCommand2_Click()
Print Space(5)& "面积="; &O3; 0.14 * r * r
End Sub
本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！
