...缺少子程序,函数或属性下面是代码本人是菜鸟是按照书上一步一步...

发布网友发布时间：2024-10-24 18:58

共2个回答

热心网友时间：2024-11-05 17:11

Print "圆的面积为：": s
Print "圆的周长为：": l
你打的是：（冒号），但应该是；（分号）

热心网友时间：2024-11-05 17:15

正确代码如下：
Private Sub Form_Click()
Dim r As Single, s As Single, l As Single
Const pi = 3.1415926
r = Val(InputBox("请输入某圆的半径："))
s = r * r * pi
l = 2 * r * pi
Print "圆的面积为："; s
Print "圆的周长为："; l
End Sub

你的代码的错误原因是print语句中 s 与 l 前面的符号错了
把我上面的复制进去试试

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com

...缺少子程序,函数或属性 下面是代码 本人是菜鸟 是按照书上一步一步...

...缺少子程序,函数或属性下面是代码本人是菜鸟是按照书上一步一步...