Question

怎样用VB设计一个程序计算正方形的面积？

Answer 1

新建一个工程，双击form1窗体空白区域，在出现的代码窗口中输入如下代码：
private
sub
form_load()
a
=
inputbox("请输入边长：",
"计算正方形的面积
")
msgbox
"面积="
&
a
*
a
end
sub

Answer 2

文本框1（Text1，用于输入边长a），文本框2（Text2，用于输出面积S），按钮（Button1，用于点击计算）。
Private Sub Button1_Click()
Dim a, S as Double
a=Text1.text
S=a*a
Text2.text=S
End Sub