填空题

程序执行结果s的值是【7】。 Private Sub sub1(Byval p As Integer) p=p*2 End Sub Private Sub Command1_Click() Dim i As Integer i=3 Call sub1(i) if i＞4 then i=i mod 2 Print cstr(i) End Sub

【参考答案】

C

<上一题目录下一题>

热门试题

填空题

面向对象的模型中，最基本的概念是对象和【4】。

单项选择题

在窗体上面一个命令按钮，其名称为Command1，然后编写如下程序： Function Func(ByVal x As Integer，y As Integer) y=x*y If y＞0 Then Func=x Else Func=y End If End Function Private Sub Command1_Click() Dim a As Integer，b As Integer a=3 b=4 c=Func(a，B) Print a= ；a Print b= ；b Print”c= ；c End Sub 程序运行后，单击命令按钮，其输出结果为： ______。

A．a=3 b=12 c=3
B．a=3 b=4 c=3
C．a=3 b=4 c=12
D．a=13 b=12 c=12

相关试题