一、选择题
(1)—(35)题每题2分,共70分。
下列各题A)、B)、C)、D)四个先项中,选择是的,请将选项涂写在答题卡位置上,答在试卷上分。
(1) 下列打开属性窗口的操作是 。
A) “视图”菜单中的“属性窗口”命令 B) 按F4键 C) 按Ctrl+T D) 单击工具栏上的“属性窗口”按钮 。
(2) 下列可以打开立即窗口的操作是 。
A) Ctrl+D B) Ctrl+E C) Ctrl+F D) Ctrl+G
(3) inputBox函数反回值的类型为 。
A) 数值 B) 字符串 C) 变体 D) 数值或字符串(视输入的数据而定)
(4) 可以删除字符串前导和尾部空白的函数是 。
A) Ltrim B) Rtrim C) Trim D) Mid
(5) 表达式4+5 \ 6 * 7 / 8 Mod 9 的值是
A) 4 B) 5 C) 6 D) 7
(6) 在立即窗口中操作: a=8 ( 是回车键,下同) b=9 print a>b 则输出结果是 。
A) -1 B) 0 C) False D) True
(7) 语句的输出结果是 。 Print Format $(32548.5,“000,000.00”)
A) 32548.5 B) 32,548.5 C) 032,548.50 D) 32,548.50
(8) 程序段后,变量c$的值为 a$=“Visual Basic Programing” b$=“Quick” c$=b$ & UCase(Mid$(a$,7,6)) & Right $ (a$,11)
A) Visual BASIC Programing B) Quick Basic Programing C) QUICK Basic Programing D) Quick BASIC Programing
(9) 在按下回车键时某个命令按钮的事件过程,需该命令按钮的属性设置为True,属性是 。
A) Value B) Default C) Cancel D) Enabled
(10) 把焦点移到某个指定的控件,所使用的方法是
A) SetFocus B) Visible C) Refresh D) GetFocus
(11) 设a=6,则 x=IIf(a>5,-1,0)后,x 的值为 。
A) 5 B) 6 C) 0 D) -1
(12) 下面的程序段后,x 的值为 。 x=5 For i=1 To 20 Step 2 x=x+i\5 Next i
A) 21 B) 22 C) 23 D) 24
(13) 在窗体上画命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j =1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是 。
A) 7 B) 15 C) 157 D) 538
(14) 在窗体上画命令按钮,然后编写如下事件过程: Prevate Sub Command1_Click() x=0 Do Until x=-1 a = InputBox(“请输入A的值”) a = Val(a) b = InputBox(“请输入B的值”) b = Val(b) x = InputBox(“请输入x的值”) x = Val(x) a = a+b+x Loop Print a End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为 。 A) 2 B) 3 C) 14 D) 15
(15) 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和命令按钮(Name 属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click() a=Text1.Text+Text2.Text Print a End Sub
Private Sub Formm_Load() Text1 Text="" Text2 Text="" End sub 程序运行后,在个文本框(Text1)和个文本框(Text2)中分别输入123和321,然后单击命令按钮,则输出结果为 。
A) 444 B) 321123 C) 123321 D) 132231
(16) 阅读下面的程序段: For i=1 To 3 For j=1 To i For k=j To 3 a=a+1 Next k Next j Next i 上面的三重循环后,a 的值为 。
A) 3 B) 9 C) 14 D) 21
(17) 在窗体上画文本框(Name属性为Text1),然后编写如下事件过程: Private Sub Form_Load() Ttext1.Text="" Text1.SetFocus For i=1 To 10 Sum=Sum+i Next i Text1.Text=Sum End Sub 上述程序的运行结果是 。
A) 在文本框Text1中输出55 B) 在文本框Text1中输出0 C) 出错 D) 在文本框Text1中输出不定值
(18) 在窗体上画两个文本框(其Name 属性分别为Text1和Text2)和命令按钮(其Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为
A) 1和0 B) 2和72 C) 3和50 D) 4和168
(19) 用下面语句定义的数组的元素个数是 。 Dim A (-3 To 5) As Integer
A) 6 B) 7 C) 8 D) 9
(20) 程序的输出结果是 Option Base 1 Private Sub Command1_Click() Dim a(10),p(3) As Integer k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next I For i=1 To 3 k=k+p(i)*2 Next i Print k End sub
A) 33 B) 28 C) 35 D) 37
(21) 在窗体上面画命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Commandl_Click() Dim a a = Array(1,2,3,4) j = 1 For i = 4 To Step -1 s = s + a(i)*j j =j*10 Next i Print s End Sub 运行上面的程序,单击命令按钮,其输出结果是 。
A) 4321 B) 12 C) 34 D) 1234
(22) 在窗体上面命令按钮(其Name属性为Commandl),然后编写如下代码: Option Base 1 Private Sub Commandl_Click( ) Dim a(4,4) For i =1 To 4 For j =1 To 4 a(i,j) = (i-1)*3+j Next j Next i For i =3 To 4 For j =3 To 4 Print a(j,i); Next j Print Next i End Sub 程序运行后,单击命令按钮,其输出结果为 。
A) 6 9 B) 7 10 C) 8 11 D) 9 12 7 10 8 11 9 12 10 13
(23) 假定有如下的Sub过程: Sub S(x As Single,y As Single) t = x x =t/y y =t Mod y End Sub 在窗体上画命令按钮,然后编写如下事件过程: Private Sub Commandl_Click ( ) Dim a As Single Dim b As Single a =5 b =4 S a,b Print a,b End Sub 程序运行后,单击命令按钮,输出结果为 。
A) 5 4 B) 1 1 C) 1.25 4 D) 1.25 1
(24) 阅读程序: Function F(a As Integer) b = 0 Static c b = b+1 c = c+1 f = a+b+c End Function
Private Sub Commandl_Click () Dim a As Integer a =2 For i =1 To 3 Print F(a) Next i End Sub 运行上面的程序,单击命令按钮,输出结果为 。
A) 4 B) 4 C) 4 D) 4 4 5 6 7 4 6 8 9
(25) 阅读程序: Sub subP(b() As Integer) For i =1 To 4 b(i)=2*i Next i End Sub
Private Sub Commandl_Click() Dim a(1 To 4)As Integer a (1)=5 a (2)=6 a (3)=7 a (4)=8 subP a () For i =1 To 4 Print a(i) Next i End Sub 运行上面的程序,单击命令按钮,输出结果为 。
A)2 B)5 C)10 D)出错 4 6 12 6 7 14 8 8 16
$False$
--下载<<计算机等级考试二级VB全真模试题(三)>>Word文档 ,本文由东星资源网收集,版权归原作者所有
|