先建一个窗体Form1,两个标签.其Caption分别为"输入圆的半径:" "圆的面积:" 两个Text,Text属性分别为 , .意思是初始化为空格.一个命令按钮CmdSqr,添加其代码Private Sub CmdSqr_Click() Text2.Text = 3.1415926 * Val(Text1.Text) ^ 2 End Sub 至于布局相信你会做的很好
