单选题以下能够设置控件焦点的方法是( )。 A) SetFocus B) GotFoeus C) LostFocus D) TabStop
单选题要把名称为List1的列表框中当前选中的一项删除，应执行以下语句中的 ______。
单选题在窗体上画一个命令按钮(其名称为Command1)，然后编写如下事件过程： Private Sub
Command1_Click() Dim a(5,5)As Integer
Dim i As Integer,j As Integer
For i=1 To 3 For i=1 To
3
a(i,j)=(i-1)*3+j
Print a(i,j) Next
j Print
Next i End Sub
程序运行后，单击命令按钮，在窗体上的输出结果是______。
A. 1 4 7 2 5 8 3 6
9
B. 1 2 3 4 5 6 7
8 9
C. 1 2 3 4 5 6 7 8 9
D. 没有输出
单选题窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是
____
。
Private Sub Commandl_Click()
Picturel.Picture=LoadPicture("c：/picture.jpg")
Picmrel.Cls
Picturel.Print "picture"
End Sub
单选题
单选题为了使标签覆盖背景，应将BackStyle属性设置为
A. 0
B. 1
C. True
D. False
单选题下列数组定义中错误的是
单选题引用列表框(Listl)最后一个数据项应使用的表达式是( )。
单选题对于循环队列，下列叙述中正确的是( )。
单选题下面（ ）数写成普通的十进制数是2.567E-2.
单选题声明一个变量为局部变量应该用
单选题有如下函数过程： Function fl(x As Integer)As Long Dim s As Long，i As Integer s=0 For i=1 To x s=s+i Nexti f1=s End Function 在窗体上添加一个命令按钮，名为Command1，并编写事件过程调用该函数，则输出结果为( )。 Private Sub Command1_Click() Dim i As Integer，sum As Long For i=1 To 5 sum=sum+n(i) Next i Print sum End Sub
单选题以下说法错误的是 ______。 A) 函数过程没有返回值 B) 子过程没有返回值 C) 函数过程可以带参数 D) 子过程可以带参数
单选题有一个名称为Fom1的窗体，上面没有控件，设有以下程序(其中方法PSet(X，Y)的功能是在坐标X，Y处画一个点)。 Dim cmdmave As Boolean Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) cmdmave=True End Sub Private Sub Form MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) If cmdmave Then Form1.PSet(X，Y) End If End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) cmdmave=False End Sub 此程序的功能是______。 A) 每按下鼠标键一次，在鼠标所指位置画一个点 B) 按下鼠标键，则在鼠标所指位置画一个点；放开鼠标键，则此点消失 C) 不按鼠标键而拖动鼠标，则沿鼠标拖动的轨迹画一条线 D) 按下鼠标键并拖动鼠标，则沿鼠标拖动的轨迹画一条线，放开鼠标键则结束画线
单选题为计算an的值，某人编写了函数power如下： Private Function power(a As Integer, n As Integer) As Long Dim p As Long p=a For k=1 To n p=p*a Next k power=p End Function 在调试时发现是错误的，例如Print power(5, 4)的输出应该是625，但实际输出是3125，程序需要修改。下面的修改方案中有3个是正确的，错误的是 A)把For k=1 To n改为For k=2 to n B)把p=p*a改为p=p^n C)把For k=1 To n改为For k=1 To n-1 D)把p=a改为p=1
单选题在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBoxa$,,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。
单选题下列选项，不属于模块间耦合的是
单选题在调用含有对象的过程时，对象只能通过______传送。
单选题在窗体上画一个名称为Command1的命令按钮，并编写如下过程： Private Sub Command1_Click() Dim x AS Integer Static y As Integer x=10 y=5 Call f1(x, y) Print x,y End Sub Private Sub f1(ByRef x1 As Integer, y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。
单选题下列符号常量的声明中，不合法的是 A) Const a As Single=1.1 B) Const a="OK" C) Const a As Double=Sin(1) D) Const a As Integer="12/