以下程序用宋输出20个在开区间(10，87)中的随机整数R，每行输出4个整数。请完善下列程序。
Private Sub Command1_Click()
For I = 1 To 10
R = 【9】
Print R；
If I Mod 4=0 Then Print
Next I
End Sub

假定其他条件不变，当利率水平很高，货币需求对利率缺乏弹性导致出现完全的排挤效应时，财政赤字会造成( )。

A．收入和产量的增加

B．利率的提高

C．投资的增加

D．投资和消费的减少

E．利率的下降