下列程序功能是，产生10个0-100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As Integer Randomize For i%=1 To 10 an(i%)= 【10】 Next max=an(1) For i%=2 to 10 if an(i%)＞max then max=an(i%) End If Next Print max End Sub

某施工企业于2007年1月接受一项隧道施工工程，按照合同规定和施工进度，2007年底应结算工程价款5000万元，但由于甲方资金周转困难，没有按合同支付工程款。2007年底施工企业应将该笔工程款确认为( )。

A．其他应收款

B．待摊费用

C．应收账款

D．银行存款