以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。
　　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)
　　　　【11】　
　　　N=Val(N)
　　　　【12】　
　　End Sub

新生儿特殊的药物不良反应不包括（）

A.对吗啡耐受性差，较易出现呼吸抑制

B.高胆红素血症

C.电解质紊乱

D.高铁血红蛋白血症

E.溶血