
如何利用VB6.0求矩形的面积?要求分别在文本框中输入长和宽,然后在第三个文本框输出。
2个回答
2011-03-12
展开全部
先拖三个文本框到界面,长(a)为text1,宽(b)为text2,面积(s)在text3输出
再编写程序:
private sub command1_click()
dim a as double
dim b as double
dim s as double
a=val(text1.text)
b=val(text2.text)
s=a*b
text3.text=s
end sub
不过第三个为什么要在文本框中输出?在label中输出更好,不然面积的值可以随意改动了
再编写程序:
private sub command1_click()
dim a as double
dim b as double
dim s as double
a=val(text1.text)
b=val(text2.text)
s=a*b
text3.text=s
end sub
不过第三个为什么要在文本框中输出?在label中输出更好,不然面积的值可以随意改动了
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询