...缺少子程序,函数或属性 下面是代码 本人是菜鸟 是按照书上一步一步...
发布网友
发布时间：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 前面的符号错了
把我上面的复制进去 试试
