下列适合于理想气体绝热不可逆恒外压过程的关系式是（） A: ClnT/T=Rlnp/p B: dU=-W C: ClnT/T=-RlnV/V D: pV=常数 E: C（T-T）=-p（V-V）

设有如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer Dim n As Integer n=InputBox("输入数据") If n＜10 Then Call GetArray(a,n) End If End Sub Private Sub GetArray(b()As Integer,n As Integer) Dim c(10)As Integer j=0 For i=1 To n b(i)=Clnt(Rnd()*100) Ifb(i)/2=b(i)\2 Then j=j+1 c(j)=b(i) End If Next Print j End Sub 以下叙述中错误的是( )。 A: 数组b中的偶数被保存在数组C中 B: 程序运行结束时，在窗体上显示的是c数组中元素的个数 C: GetArray过程的参数n是按值传送的 D: 如果输入的数据大于10，则窗体上不显示任何信息