![[填空题] 程序如下： Private Sub Form_Click()Const PI=3.14159Dim r As Single，S As SingleR=InputBox("请输入](http://www.mshxw.com/aiimages/31/261493.png "[填空题] 程序如下： Private Sub Form_Click()Const PI=3.14159Dim r As Single，S As SingleR=InputBox(\"请输入")
[填空题] 程序如下：
Private Sub Form_Click()
Const PI=3.14159
Dim r As Single，S As Single
R=InputBox("请输入圆的半径"，"输入数据"，"50")
S = PI*r*r
Print "S="；Format(S，"###，###.##")
End Sub
程序运行后，单击窗体，将显示一个输入对话框，输入数据35，单击“确定”按钮后，输出结果为 【9】 。
参考答案：
S=3，848.45解析：[分析]： 本题用Format函数对数值进行格式化输出，要输出的数值存放在变量S中。 Format函数的第一个参数对变量S进行了四舍五入处理，保留两位小数，第3位小数四舍五入，其值为3 848.45。Format函数的第二个参数是格式说明符，使用的说明符有“#”和“，”，保留两位小数，该函数的返回值为3，848.45。问题解析:
解析无
