填空题

以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。　　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")

<上一题目录下一题>

热门试题

填空题

下述程序段在运行时的显示结果是【】。Clsx=1．34 + 8Print Len(x)

填空题

以下过程的作用是将26个小写字母逆序打印出来，请补充完整。Sub Inverse()For i=122 To 【】 Print 【】；Next iEnd 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