房地产经纪诚信体系以保证诚信原则在房地产经纪服务领域的贯彻为价值目标，这一诚信体系应包含（）。

A.信用制度

B.信用管理

C.信用信息

D.信用机构

E.信用法律

窗体下面有一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x=0
Do Until x=-1
a=InputBox("请输入第一个数字a的值")
a=Val(a)
b=InputBox("请输入第二个数字b的值")
b=Val(b)
x=InputBox("请输入第三个数字x的值")
x=Val(x)
a=a+b+x
Loop
Print a
End Sub
在程序运行后，单击命令按钮，在对话框中分别输入5，4，8，5，8，-1，输出结果为______。