-
1以下叙述中正确的是 （ ） 。
A.一个 Sub 过程至少要一个 Exit Sub 语句
B.一个 Sub 过程必须有一个 End Sub 语句
C.可以在 Sub 过程中定义一个 Function 过程，但不能定义 Sub 过程
D.调用一个 Function 过程可以获得多个返回值
开始考试点击查看答案 -
2有以下程序：Option Base 1Dim arr() As IntegerPrivate Sub Form_Click()Dim i As Integer,j As IntegerReDim arr(3,2)For i=1 To 3For j=1 To 2arr (i,j)=i*2+jNext jNext iReDim Preserve arr(1,4)For j=3 To 4arr(3,j)=j+9Next jPrint arr(3,2);arr(3,4)End Sub程序运行后，单击窗体，输出结果为 （ ） 。
A.8 13
B.0 13
C.7 12
D.0 0
开始考试点击查看答案 -
3在窗体上画一个命令按钮，名称为 Command1, 然后编写如下代码：Option Base 0Private Sub Command1_Click()Dim A (4)As Integer,B(4) As IntegerFor k=0 To 2A(k+1)=InputBox(“ 请输入一个整数 ”)B(3-k)=A(k+1)Next kPrint B(k)End Sub程序运行后，单击命令按钮，在输入对话框中分别输入 2 、 4 、 6 ，输入结果为 （ ） 。
A.0
B.2
C.3
D.4
开始考试点击查看答案 -
4在窗体上画一个名称为 Commandl 的命令按钮，然后编写如下程序：Private Sub Commandl Click()Dim i As Integer, j As IntegerDim a (10,10)As IntegerFor i=1 To 3For j= i To 3a(i,j)=(i-1)*3+jPrint a (i,j);Next jPrintNext iEnd Sub程序运行后，单击命令按钮，窗体上显示的是 （ ） 。
A.123246369
B.234345456
C.147258369
D.123456789
开始考试点击查看答案 -
5在窗体上画一个名称为 Listl 的列表框，一个名称为 Labell 的标签，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名从列表框中消失，并在标签中显示出来。下列能正确实现上述操作的程序是 （ ） 。
A.Privale Sub Listl_Click()Labell. Caption=Listl. ListIndexListl. Removeltem Listl.TextEnd Sub
B.Private Sub Listl_Click()Labell.Name=Listl. ListIndexListl.RemoveItem Listl.TextEnd Sub
C.Private Sub Listl_Click()Labell. Caption=Listl.TextListl. RemovItem Listl. ListIndexEnd Sub
D.Private Sub Listl_Click()Labell. Name=Listl. TextListl. RemoveItem Listl. ListIndexEnd Sub
开始考试点击查看答案 -
6设有如下通用过程：Public Function Fun(xStr As String)Dim tStr As String, srtL As Integer tStr+””strL=Len(xStr)i=1Do While i<=strL/2tStr=tStr &Mid(xStr,i ,1)& Mid (xStr ,strL-i+1,1)i=i+1LoopFun=tStrEnd Function在窗体上画一个名称为 Textl 的文本框和一个名称为 Command1 的命令按钮，然后编写如下的事件过程：Private Sub Command 1_ Click()Dim S1 As StringS1=”abcdef”Text1.Text=UCase(Fun(S1))End Sub程序运行后，单击命令按钮，则 Text1 中显示的是 （ ） 。
A.ABCDEF
B.abcdef
C.AFBECD
D.DEFABC
开始考试点击查看答案 -
7在窗体上画一个名称为 TxtA 的文本框，然后编写如下的事件过程：Private Sub TxtA_KeyPress(KeyAscii As Integer)……End Sub假定焦点已经位一地文本框中，则能够触发 KeyPress 事件的操作是
A.单击鼠标
B.双击文本框
C.鼠标滑过文本框
D.按下键盘上的某个键
开始考试点击查看答案 -
8在窗体上画一个命令按钮和两上文体，其名称分别为 Command1 、 Text1 和 Text2 ，然后编写如下程序：Dim S1 As String, S2 As StringPrivate Sub Form_Load()Text1. Text=””Text2. Text=””End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)S2=s2 & Chr(KeyCode)End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)S1=S1 & chr(KeyAscii)End SubPrivate Sub Command1_Click()Text1.Text=S2Text2.Text=S1S1= “”S2= “”End Sub程序运行后，在 Text1 中输入“ abc ”，然后单击命令按钮，在文本框 Text1 和 Text2 中显示的内容分别为 （ ） 。
A.abc 和 ABC
B.abc 和 abc
C.ABC 和 abc
D.ABC 和 ABC
开始考试点击查看答案 -
9以下说法正确的是 （ ） 。
A.任何时候都可以通过执行“工具”菜单中的“菜单编辑器”命令打开菜单编辑器
B.只有当某个窗体为当前活动窗体时，才能打开菜单编辑器
C.任何时候都可以通过单击标准工具栏上的“菜单编辑器”按钮打开菜单编辑器
D.只有当代码窗品为当前活动窗口时，才能找开菜单编辑器
开始考试点击查看答案 -
10在窗体上画一个通用对话框，其名称为 CommonDialog1 ，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click()CommonDialog1. Filter=”All Files(*.*)|*.*Text Files”&_“(*.txt)|*.txt| Executable Files(*.exe)|*.exe”CommonDialog1. Filterindex=3CommonDialog1. Show OpenMsgBox CommonDialog1. FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 （ ） 。
A.All Files(*.*)
B.Text files(*.txt)
C.Executable Files(*.ext)
D.不确定
开始考试点击查看答案