第31题: [填空题]以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。
Sub RecArea(L，W)
Dim S As Double
S=L*W
MsgBox"Total Area is"& Str(S)
End Sub
Private Sub Command1_Click（ ）
Dim M，N
M=InputBox("What is the L")
M=Val(M)
【 】
N=Val(N)
【 】
End Sub
参考答案:N=InputBox("What is the W") 答案解析:程序通过RecArea来计算并输出矩形的面积，它有两个形式参数，分别为矩形的长和宽；在Sub事件过程中，从键盘上输入矩形的长 和宽，调用InputBox函数分别将输入的数赋给M和B，所以第一个空为N=
第37题: [多项选择]承租人在租赁业务中发生的下列各项费用中，属于履约成本的有( )。 A. 佣金 B. 人员培训费 C. 维修费 D. 技术咨询和服务费 E. 印花税 参考答案:B,C,E 答案解析:[解析] 履约成本是指在租赁期内为租赁资产支付的各种使用费用，如技术咨询和服务费、人员培训费、维修费、保险费等。佣金和印花税属于初始直接费用。
