问题 填空题

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1),编写如下事件过程:
Private Sub Command1_Click()
Dim x As Integer,y As Integer,z As Integer
x=3:y=5:z=10
Me!Text1=""
Call f(x,y,z)
Me!text1=z
End Sub
Sub f(a As Integer,b As Integer,c As Integer)
c=b*a
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的内容是______。

答案

参考答案:O

解析: 本题考查函数调用中参数传递的知识。在VBA的函数调用时,参数有两种传递方式:传址传递和传值传递。如果在函数声明时没有说明传递类型,则默认为传址传递,即形参的结果会传递给实参。本题中形参均为传址传递,即a=x=3,b=y=5,c=z=10。但是在子程序里面对c重新赋值为c=a*b=15,这个值15会回送给实参z,所以最后显示的值z也就是15。

阅读理解与欣赏

阅读《满井游记》一文中节选部分,完成 l~5 题。   

  廿二日天稍和,偕数友出东直,至满井。高柳夹堤,土膏微润,一望空阔,若脱笼之鹄。,于时冰皮始解,波色乍明,鳞浪层层,清澈见底,晶晶然如镜之新开而冷光之乍出于匣也。山峦为晴雪所洗,娟然如拭,鲜妍明媚,如债女之蔽面而髻鬟之始掠也。柳条将舒未舒,柔梢披风,麦田浅鬣寸许。游人虽未盛,泉而茗者,萤而歌者,红装而蹇者,亦时时有。风力虽尚劲,然徒步则汗出浃背。凡曝沙之鸟,呷浪之鳞,悠然自得,毛羽鳞鬣之间皆有喜气。始知郊田之外未始无春,而城居者未之知也

  夫不能以游堕事,潇然于山石草木之间者,惟此官也。而此地适与余进,余之游将自此始,恶能无纪?己亥之二月也。

1. 解释下列旬中加粗词的意思。

①廿二日天稍     (   )    ②泉而者   (   )

③柳条将未舒     (   )    ④呷浪之   (   )

2. 从文段中找出与下列句子加粗词语意义和用法完全相同的一个句子。  

①若脱笼鹄 __________________________                           

②娟如拭  __________________________                           

3. 将文中画线句子翻译成现代汉语。   

  译文:__________________________                                                                

4. 文中“晶晶然如镜之新开而冷光之乍出于匣也”形容的景物是____________其特是:____________。(用自已的话概括)

5. 选文最后一段作者说自己“不能以游堕事,潇然于山石草木之间”。“潇”意为“潇洒无牵挂”,你觉得文章中有哪些地方能体现作者的“潇然”呢?试作分析。

 答:__________________________                                                                        

多项选择题