Private Sub Command1_Click()
D.im a(10)As Integer
D.im x As Integer
F.or i=1 To 10
a(i)=i
Next i
x=1
MsgBoxa(f(x)+x)
E.nd Sub
F.unction f(y As Integer)
y=y+2
f=y
E.nd Function
程序运行后,单击命令按钮,消息框的输出结果为______。