填空题

程序如下： 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
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个列表框，然后编写如下两个事件过程：Private Sub Form_Click()List1．RemoveItem 1List1．Removeltem 3List1．RemoveItem 1End SubPrivate Sub Form Load()List1．AddItem ItemA List1．AddItem ItemB List1．AddItem ItemC List1．AddItem ItemD List1．AddItem ItemE End Sub运行上面的程序，然后单击窗体，列表框中所显示的项目为 【10】 。
填空题
在程序执行闲置循环过程中，程序的控制权被系统占用。若要获得控制权，可以使用一个语句，这样用户可以在获得系统的控制权后进行其他操作，这个语句是 【7】 。
相关试题