问题 单项选择题

设已经在“菜单编辑器”中设计了窗体的快捷菜单,其顶级菜单为Bs,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单响应鼠标右键菜单的是( )。

A.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,-     X As Single,Y As Single)  If Button=2 Then PopupMenu Bs,2  End Sub

B.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,-        X As Single,Y As Single)    PopupMenu Bs  End Sub

C.Private Sub FOrm_MouseDown(Button As Integer,Shift As Integer,-       X As Single,Y As Single)    PopupMenu Bs,0  End Sub

D.Private Sub Form_MouseDown(Button As Integer,Shin As Integer,-       X As Single,Y As Single)    If(Button=vbLeftButton)Or(Button=vbRightButton)Then PopupMenu Bs  End Sub

答案

参考答案:A

解析:在Visual Basic中,允许出现快捷菜单,对用户来说,提供了很大的方便,一般来说,菜单都在窗口的顶部,有时,用户需要执行菜单中的某一命令,就得把鼠标移动到窗口顶部,然后打开菜单选择命令,这对用户来说,会觉得麻烦。而快捷菜单并不需要到窗口的顶部来打开,只要单击鼠标右键,就会弹出菜单。设计快捷菜单仍然可以用Visual Basic中提供的菜单编辑器,只要把某个菜单设置成隐藏就可以了,实际上,不管是在窗口顶部菜单条上显示的菜单还是隐藏的菜单,都可以用PopupMenu方法把它们作为快捷菜单在运行时显示出来。PopupMenu方法的使用形式如下:  [对象].PopupMenu菜单名,标志,x,y  其中,x,y是提供菜单显示的位置;标志:指定快捷菜单的行为。

材料分析题

材料一:(2008 .05 .14 )下午1 点左右,救援队员们在一个幼儿园的废墟下发现了一个被困的小女孩。废墟随时有可能因为余震而再次坍塌,孩子的性命危在旦夕。“快,这里有人。”在队员的招呼下,十多名队员迅速赶了过来。“叔叔,我不怕,你们不要担心。”救援过程中,面对队员的安慰,孩子反倒安慰起了队员们。一块块砖石被移开,队员们才发现孩子双腿被卡,下半身沾满鲜血,从紧咬的牙齿中,不难看出孩子正遭受着巨痛的折磨。“两只老虎跑得快……”工具简单,救援工作十分缓慢,就在大家着急之时,孩子突然唱起了儿歌。“我唱歌就不会觉得痛。”获救后,孩子告诉队员,她叫任思雨。

材料二:近来,中小学生因课业负担过重而自杀的消息时时见诸报端,暴露出当代中小学生对生命轻视和珍爱生命意识的淡薄等弱点。例如:据报道,山西临汾某小学五年级学生甜甜因无法承受“作业过多”的压力而上吊自杀了。

材料三:臧克家的诗《有的人》这样写道:“有的人活着他已经死了;有的人死了他还活着。有的人他活着别人就不能活;有的人他活着为了多数人更好地活。”

(1)材料一和材料二中,任思雨和甜甜对待生命的态度分别是什么样的?

________________________________________________________________________________

(2)材料三中为什么说“有的人活着他已经死了;有的人死了他还活着”?

________________________________________________________________________________

(3)写出你的生命箴言。

________________________________________________________________________________

问答题 简答题