题目内容:
以下是一个计算矩形面积的程序,调用过程计算矩形面积,请将程序补充完整。 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
参考答案:
答案解析:
以下是一个计算矩形面积的程序,调用过程计算矩形面积,请将程序补充完整。 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