以下RecArea是一个计算矩形面积的过程，然后调用该过程计算出以文本框为边长的矩形的面积，请你完善程序。 Sub RecArea(Rlen As Single, Rwid As Single) Dim Area As Single Area = Rlen*Rwid MsgBox "Total Area is " & Area （应该是这个，不然这个变量也没用了。）End Sub Private Sub Command1_Click() Dim A As Single, B As Single A = Val(InputBox("What is the length? ")) B = Val(InputBox("What is the width? ")) Call RecArea(A, B) End Sub为什么要“str（area）”？
