锖色五金网 >> 输送网带

计算机等级考试二级VB全真模试题三下0过滤阀

2022-08-13

计算机等级考试二级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

西安治疗性病专科

引起涎腺囊肿的原因有哪些

检查不孕不育多少钱

兰州中研医院官网

检查不孕多少钱

友情链接