考试网 >> IT认证 >> 等级 >> 二级考试 >> 05年4月等级考试二级VB真题(附答案)

发布时间：2006-06-27 23:26     点击：

　　C)Sub Main过程或其他任何模块

　　D)Sub Main过程或任何窗体

　　(25)假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是

　　A)数组中每个命令按钮的名称(名称属性)均为Command1

　　B)数组中每个命令按钮的标题(Caption属性)都一样

　　C)数组中所有命令按钮可以使用同一个时间过程

　　D)用名称Command1(下标)可以访问数组中的每个命令按钮

　　(26)把窗体的KeyPreview属性设置为True,然后编写如下事件过程:

　　Private Sub Form_KeyPress(KeyAscii As Integer)

　　Dim ch As String

　　ch = Chr(KeyAscii)

　　KeyAscii = Asc(UCase(ch))

　　Print Chr(KeyAscii + 2)

　　End Sub

　　程序运行后,按键盘上的”A”键,则在窗体上显示的内容是

　　A)A

　　B)B

　　C)C

　　D)D

　　(27)在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:

　　Private Sub Command1_Click()

　　a = InputBox("请输入日期(1~31)")

　　t = "旅游景点:" _

　　& IIf(a > 0 And a <= 10, "长城", "") _

　　& IIf(a > 10 And a <= 20, "故宫", "") _

　　& IIf(a > 20 And a <= 30, "颐和园", "")

　　Text1.Text = t

　　End Sub

　　程序运行后,如果从键盘输入16,则在文本框中显示的内容是:

　　A)旅游景点：长城故宫

　　B)旅游景点：长城颐和园

　　C)旅游景点：颐和园

　　D)旅游景点：故宫

　　(28)在窗体上画一个名称为Label1的标签,然后编写如下事件过程:

　　Private Sub Form_Click()

　　Dim arr(10, 10) As Integer

　　Dim i As Integer, j As Integer

　　For i = 2 To 4

　　For j = 2 To 4

　　arr(i, j) = i * j

　　Next j

　　Next i

　　Label1.Caption = Str(arr(2, 2) + arr(3, 3))

发表评论： 匿名发表 用户名: 查看评论

您将承担一切因您的行为、言论而直接或间接导致的民事或刑事法律责任 留言板管理人员有权保留或删除其管辖留言中的任意内容 本站提醒：不要进行人身攻击。谢谢配合。