病历摘要：患者男性，53岁，右上腹隐痛伴低热3个月，纳差1月入院，体重下降10公斤。有乙肝病史。体检肝肋下2．5cm可及，质硬，表面不光滑，脾肋下3cm可及。

下列哪些因素与原发性肝癌发病无关？（）

A.肝硬化

B.胆道蛔虫

C.华支睾吸虫

D.黄曲霉素

E.病毒性肝炎

F.胆石症

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