Question

VB程序设计：编写一个计算矩形面积的过程，在主程序中输入长和宽，然后调用该过程。

Answer 1

过程函数如下：
Pirvate Sub S_squ()
int a '定义整形数据a 也就是矩形的一边
int b '定义整形数据b 也就是矩形的另一边
int s '定义整形数据S 也就是矩形的面积
s=a*b
End Sub

主程序如下

Public command_click()
a = Val(Inputbox("请输入矩形的一边"a"的值！")
b= Val(Inputbox("请输入矩形的另一边"b"的值！")
s= S_squ(a,b)
print
print s

可能里面还有一些小错误，基本就是这样了，希望对你有帮助