A-A+

程序如下： Private Sub Form_Click() Const PI=14159

2022-08-12 20:22:24 问答库阅读 197 次

问题详情

程序如下： Private Sub Form_Click() Const PI=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进行了四舍五入处理，保留两位小数，第3位小数四舍五入，其值为3848.45。Format函数的第二个参数是格式说明符，使用的说明符有“#”和“，”，保留两位小数，该函数的返回值为3，848.45。