有如下程序：　　Private Sub Commandl_Click()　　　Dim a As Integer　　　a=2　　　For i=1 To 3　　　　　Print Gad (

A．

　　　　　Next i

　　End Sub

　　Function Gad (a As Integer)

　　　b=0

　　　Static c

　　　b=b + 1

根据我国相关文件的规定，施工质量验收的基本单元是（）。

A.分项工程

B.检验批

C.检验批和分项工程

D.分部工程