发包人以对工程质量有异议，拒绝办理工程竣工结算的，已竣工验收或已竣工未验收但实际投入使用的工程，其质量争议（）。

A．按该工程保修合同执行

B．可以再规定范围内自由定价

C．竣工结算按合同约定办理

D．可以诉讼法律

若有以下程序，当程序运行后，单击命令按钮，则输出的结果为( )。
Private Sub Command1_Click()
Dim a%(1 To 4), b%(3 To 6), i%, s1#, s2#
For i= 1 To 4
a(i) = i
Next i
For i=3 To 6
b(i) = i
Next i
s1 = Factorial (

A．
s2 = Factorial (

B．
Print "s1="; s1; "s2="; s2
End Sub
Function Factorial(a() As Integer)
Dim t#, i%
t=1
For i = LBoun

C．s1=24 s2=24

D．s1=360 s2=360