( )不属于信用风险控制的手段。

A．授权管理

B．贷款流程控制

C．贷款定价

D．客户财务分析

有如下程序： Private Sub Form_Click() 　Dim Check,Counter 　Check=True 　Counter=0 　Do 　　Do While Counter＜20 　　　Counter=Counter+1 　　　If Counter=10 Then 　　　　Check=False 　　　Exit Do 　　End　If Loop Loop Until Check=False Print Counter,Check End　Sub 程序运行后，单击窗体，输出结果为( )。

A．15 0

B．20　-1

C．10 True

D．10 False