单项选择题

设有如下通用过程：
Public Function f(x As Integer)
Dim y As Integer
x=20
y=2
f=x*y
End Function
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Static x As Integer
x=10
y=5
y=f(x)
Print x；y
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．10 5
B．20 5
C．20 40
D．10 40
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form Load( ) Show Text1.Text= Text1.SetFocus End Sub Pfivate Sub Form_MouseUp(BuHon As Integer，Shift As Integer，X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer，shift As Integer) Print Visua1 Basic ； End Sub 程序运行后，如果按“A”键，然后单击窗体，则在窗体上显示的内容是
A．VisualBasic
B．程序设计
C．A程序设计
D．Visual Basic程序设计
单项选择题
设有如下通用过程： Public Sub Fun(a( )，ByVal x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程： Private Sub Command1_Click( ) Dimsn(5)As Variant For i=1 To 5 arc(i)=i Next n=10 Call Fun(arr( )，n) Textl.Text=n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是
A．10
B．15
C．25
D．24
相关试题