窗体中有命令按钮Command1，事件过程如下： Public Function f(x As Integer) As Integer Dim y As Integer x＝20 y＝2 f＝x * y End Function Private Sub Command1_Click() Dim y As Integer Static x As Integer x＝10 y＝5 y＝f(x) Debug.Print x；y End Sub 运行程序，单击命令按钮，则立即窗口中显示的内容是( )。
- A.10 5
- B.10 40
- C.20 5
- D.20 40
热度🔥759
参考答案：D
解析：
【解析】本题考查的是变量的作用域，程序中命令按钮中的x是用static定义的局部静态变量，只在模块的内部使用，过程执行时才可见。当调用f函数时，所求的f函数的值是f函数中x和y的值乘积，即f函数的值是2*20=40，调用f函数后，原命令按钮中x的值被f函数的值覆盖，即x=20,。最后输出x=20,y=40，故答案为D）。
【解析】本题考查的是变量的作用域，程序中命令按钮中的x是用static定义的局部静态变量，只在模块的内部使用，过程执行时才可见。当调用f函数时，所求的f函数的值是f函数中x和y的值乘积，即f函数的值是2*20=40，调用f函数后，原命令按钮中x的值被f函数的值覆盖，即x=20,。最后输出x=20,y=40，故答案为D）。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
子过程Plus完成对当前库中"教师表"的工龄字段都加1的操作。
Sub Plus( )
Dim ws As DAO.Workspace
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim fd As DAO.Field
Set db = CurrentDb()
Set rs = db.OpenRecordset("教师表")
Set fd = rs.Fields("工龄")
Do While Not rs.EOF
rs.Edit
【 】
rs.Update
rs.MoveNext
Loop
rs.Close
db.Close
Set rs = Nothing
Set db = Nothing
End Sub
程序空白处应该填写的语句是
有如下程序：Private Sub Form_Click()Dim s As Integer， p As Integerp＝1For i＝1 To 4 For j＝1 To is＝s＋j Next j p＝p * sNext iPrint pEnd Sub程序运行后，单击窗体，则输出结果是( )。
在PowerPoint演示文稿中利用“大纲”窗格组织、排列幻灯片中的文字时，输入幻灯片标题后进入下一级文本输入状态的最快捷方法是（ ）。
