单项选择题

编写如下程序：Private Sub Command1_Click()　　Dim x As Integer， y As Integer　　x＝InputBox("输入第一个数")　　y＝InputBox("输入第二个数")　　Call f(x， y)　　Print x， yEnd SubSub f(a As Integer， ByVal b As Integer)　　a＝a * 2　　x＝a＋b　　b＝b＋100End Sub程序运行后，单击命令按钮Command1，并输入数值10和15，则输出结果为(　　)。