单项选择题

如下事件过程： 　　Function Feed(x) 　　　　If x ＜10 Then 　　　　　　Feed=X 　　　　Else 　　　　　　Feed=10+x 　　End If 　　End Function 　　Private Sub Command1_Click( ) 　　　　x=Val(Input Box(" "，0)) 　　　　pay=Feed(x) 　　　　Print pay 　　End Sub 　　运行时在输入框内输入变量x的值为15，输出结果为( )。

A．1234
B． foo～ ～bar
C． virtual
D． 34var
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，并编写如下程序：Private Sub Command1_Click( )Dim x As IntegerStatic y As Integerx=10y=5Call f1(x，y)Print x，yEnd SubPrivate Sub f1(ByRef x1 As Integer，y1 As Integer)x1=x1+2y1=y1+2End Sub程序运行后，单击命令按钮，在窗体上显示的内容是（ ）。
A．10 5
B．12 5
C．10 7
D．12 7
单项选择题
有如下的程序：Private Sub Command1_Click( )Dim k As Integer，m As IntegerDim P As Integerk=4：m=1P=Pid(k，m) ：Print P；P=Pid(k，m) ：Print PEnd SubPrivate Function Pid(a As Integer，b As Integer)Static m As Integer，i As Integerm=5：i=2i=i + m + 1m=i + a + bPid=m 2End Function单击命令按钮后，输出结果为（ ）。
A． 2 2
B． 4 4
C． 5 5
D． 6 6
相关试题