划拨国有建设用地使用权抵押需要订立抵押合同，并办理抵押登记，《担保法》规定（）。

A.土地抵押是实务抵押

B.当事人不办理登记的，不得对抗第三人

C.抵押权的客体是法律允许转让的土地所有权

D.抵押权的客体是法律允许转让的土地凭借权

程序执行结果s的值是 【7】 。
Private Sub subl(Byval p As Integer)
p=p * 2
End Sub
Private Sub Command1_Click( )
Dim i As Integer
i=3
Call sub1 (i)
if i＞4 then i=i mod 2
Print cstr(i)
End Sub