填空题

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

单项选择题
单击命令按钮，下列程序的执行结果为( )。Private Sub Commandl_Click()Dim x As Integer，y As Integerx=32：y=42Call PCS(x，y)Print x；yEnd SubPublic Sub PCS(Byval n As Integer，ByVal m As Integer)n=n Mod 10+1m=m Mood 10+1End Sub
A．If x<3 * y And x>y Then y=x^3
B．If x<3 * y And x>y Then y=3x
C．If x<3 * y：x>y Then y=x^3
D．If x<3 * y And x>y Then y=x * * 3
单项选择题
有如下程序：Private Sub Commandl_Click( )Dim i As IntegerFor i=1 To 2DSNext iEnd SubSub DS( )Dim x As Integer，m As StringStatic y，nX=X + 1y=y + 1m=m & *”：n=n& # Print x，y，m，nEnd Sub程序运行后，输出的结果是( )。
A． * p表示的是指针变量p的地址
B． p表示的是变量a的地址，而不是变量a的值
C． * p表示的是指针变量p的值
D． * p只能用来说明p是一个指针变量
相关试题