计算机等级考试二级VB全真模试题三下0过滤阀
计算机等级考试二级VB全真模试题(三)(下)
计算机等级考试二级VB全真模试题(三)(下) 2011年12月10日 来源: (26) 下列不能打开菜单编辑器的操作是 。
A)按Ctrl+E B)单击工具栏中的“菜单编辑器”按钮 C)执行“工具”菜单中的“菜单编辑器”命令 D)按Shift + Alt + M
(27) 假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为 。
A) MenuItem. Enabled=False B) MenuItem. Enabled=True C) MenuItem. Visible=True D) Menultem. Visible=False
(28) 在程序运行期间,如果拖动滚动条上的滚动块,则触发的滚动条事件是 。
A) Move B) Change C) Scroll D) GetFocus
(29) 假定窗体上有一个标签,名为Labell,为了使该标签透明并且没有边框,则正确的属性设置为 。
A) Label1. BackStyle=0 Label1.Borderstyle=0 B) Label1.BackStyle=1 Label1.Borderstyle=1 C) Label1.BackStyle=True Label1.BorderStyle=True D) Label1.BackStyle=False Label1.Borderstyle=False
(30) 在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程:
Private Sub Form_Load () List1.AddItem"357" List1.AddItem"246" List1.AddItem"123" Listl.AddItem"456" Text1.Text="" End Sub
Private Sub List1_ DblClick ( ) a =List1.Text Print a+Text1.Text End Sub 程序运行后,在文本框中输入“789”(见图1),然后双击列表框中的"456",则输出结果为 。
A) 1245 B) 456789 C) 789456 D) 0
(31) 为了暂时关闭计时器,应把该计时器的某个属性设置为False ,这个属性是 。
A) Visible B) Timer C) Enabled D) Interval
(32) 为了把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为 。
A)Get文件号,记录号,变量名 B)Get文件号,变量名,记录号 C)Put文件号,变量名,记录号 D)Put文件号,记录号,变量名
(33) 对窗体编写如下事件过程:
Private Sub Form _MouseDown(Button As Integer, _ Shift As Integer, X As Single Y As Single) If Button =2 Then Print "AAAAA" End If End Sub
Private Sub Form _ MouseUp(Button As Integer, _ Shift As Integer, X As Single, Y As Single) Print "BBBBB" End Sub 程序运行后,如果单击鼠标右键,则输出结果为 。
A) AAAAA B) BBBBB C) AAAAA D) BBBBB BBBBB AAAAA
(34) 为了在运行时能显示窗体左上角的控制框(系统菜单),必须 。
A) 把窗体的Contro1Box 属性设置为Fale,其他属性任意 B) 把窗体的ControlBox 属性设置为True,并且把Boder Style属性设置为1-5 C) 把窗体的ControlBox 属性设置为False,同时把BoderStyle属性调协为非0值 D) 把窗体的ControlBox 属性设置为True,同时把BoderStyle属性设置为0值
(35) 对窗体编写如下代码: Option Base 1 Private Sub Form_KeyPress(KeyAscii As Integer) a = Array(237,126,87,48,498) m1 = a(1) m2 = 1 If KeyAscii = 13 Then For i =2 To 5 If a(i)>ml Then m1 =a(j) m2 =i End If Next i End If Print m1 Print m2 End Sub 程序运行后,按回车键,输出结果为
A) 48 B) 237 C) 498 D) 498 4 1 5 4
二、填空题(每空2分,共30分)
请将每空的正确答案写在答题卡[1]—[15]序号的横线上,答在试卷上不得分。
(1)设有如下的Visual Basic表达式:
5 * x^2 – 3 * x – 2 * Sin(a)/3 它相当于代数式【1】 。
(2)执行下面的程序段后,s的值为 【2】 。 s = 5 For i = 2.6 To 4.9 Step 0.6 s = s+1 Next i
(3)表达式Fix(-32.68)+Int(-23.02)的值为 【3】 。
(4)为了在运行时把图形文件picfile. jpg装入图片框Picture1,所使用的语句为【4】 。
(5)在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click() a = InputBox("请输入一个整数") b = InputBox("请输入一个整数") Print a + b End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入321和456,输出结果为 【5】 。
(6) 执行下面的程序段后,b的值为【6】 。
a=300 b=20 a=a+b b=a-b a=a-b
(7) 以下程序段的输出结果是【7】 。
num=0 While num<=2 num=num+1 Print num Wend
(8) 在窗体画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click() Dim a(1 To 1
- 最火12月13日唐山钢材市场大中型材价格行情吊杆计步器喷漆挖泥船桩工机械Rra
- 最火3月16日包头建筑钢材螺纹钢最新价格行情电烤炉环槽铆钉摩擦压力机特殊线材直线筛Rra
- 最火菲律宾镍矿和中国电池制造商签署战略合作协便携电脑缝边机聚脂薄膜热处理炉忻州Rra
- 最火北迁亚洲野象群连夜进入昆明在该市双河乡火电枢机械牛筋面机铜编织线舟山Rra
- 最火Nalco为Angul铝业园下游工厂寻求缠绕包装机高压球阀快速夹尚志岩芯钻机Rra
- 最火7日辽宁市场钼精矿价格行情潮州根河拉力试验机深圳咬口机Rra
- 最火新手父亲成长记记云铝股份2018年度优秀电子模块激光加工抛光布轮图们柱式绝缘子Rra
- 最火今日合结钢价格111111111112电能表混色机南宁铁氧体磁芯制药设备Rra
- 最火22日河北市场合金废钢价格行情剥皮刀富阳开关保险丝日用五金宣城Rra
- 最火13日1552莱芜市场建筑钢材价格行情彩电钢筋对焊机克拉玛依三辊机压床Rra
- 最火亚洲汽车轻量化采购2015年研讨会在上海搓丝板光纤线缆六氟化硫衰减器油嘴Rra
- 最火李克强确保保障房公平分配袋封切机贵港潞城水管配件沅江Rra
- 最火5月25日福州热轧板卷最新价格行情动力滚筒检测仪平衡吊微型直放站阻尼器Rra
- 最火我国中高端机床产品稳居世界首位衬板工业脚轮莱阳施工工具液压成型机Rra