按现行施工管理制度规定，工地现场安装的危险性较大的起重机械设备安装完毕，必须经（）验收合格方能使用。

A．建设单位

B．没备供应部门

C．安全管理部门

D．专业管理部门

下面程序是用冒泡法将数组a中的10个整数按升序排列，请将程序补充完整。 Private Sub Command1_Click( ) Dim a, Tmp As Integer a = Array (678,45,324,528,439,387,87,875,273,823) For i = 【12】 Forj =0 To 9 Ifa (i)＜a(j) Then Tmp = a(i): a(i) = a(j) i a(j) = Tmp End If Next j,i For i = 0 To 9 Print a(i) Next End Sub