实行公务卡改革后，相应的辅助账如何设置？

在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox(“请输入：”) MsgBoxf(intNum) End Sub Function f(X As Integer)As Integer f=IIf(X＜10,X,X+5) End Function 运行程序，单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。