问题
填空题
程序如下:
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,则单击“确定”按钮后,输出结果为______。
答案
参考答案:S=3848.45
解析: 本题用Format函数对数值进行格式化输出,要输出的数值存放在变量S中。Format函数的第一个参数对变量S进行了舍入处理,保留2位小数,第3位小数四舍五入,其值为3848.45。Format函数的第二个参数是格式说明符,使用的说明符有“#”和“,”,保留两位小数,该函数的返回值为3848.45。