程序如下:
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】 。
题库:计算机等级考试
类型:填空题
时间:2017-07-03 15:00:17
免费下载:《填空》Word试卷
程序如下:
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】 。
本题关键词:程序,工程施工程序,复苏程序,工作程序,建设程序,程序变更,程序冲突,点火程序,生产程序,编制程序;