单选题下面关于多重窗体的叙述中，正确的是( )。
单选题要使一个图片框控件能自动地附着在窗体的一条边上，应设置它的( )属性。
单选题有下列程序：程序最后打印结果是______。
单选题窗体上有Command1、Command2两个命令按钮。现编写以下程序： Option Base 0 Dim a() As Integer, in As Integer Private Sub Command1_Click() m=InputBox("请输入一个正整数") ReDim a(m) End Sub Private Sub Command2_Click() In=InputBox("请输入一个正整数") ReDim a(m) End Sub 运行程序，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是
单选题窗体上有一个名为Label1的标签，为了使该标签透明并且没有边框，正确的属性设置为______。
单选题进行多窗体设计时，“窗体资源管理器”窗口是很有用的窗口。下列关于“资源管理器”窗口功能的说法中，错误的是______。
单选题设有如下通用过程： Public FunctionFun(x Str As String)As String DimtStr As String，strL As Integer tStr="" strL=Len(xStr) i=1 DoWhilei＜=strL/2 tStr=tStr&Mid(xStr,i，1)&Mid(xStr,strL-i+1，1)" i=i+1 Loop Fun=tStr End Function 在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮。然后编写如下的事件过程： Private Sub Commandl_Click() Dim S1 As String S1="abcdef" Text1.Text=UCase(Fun(S1)) End Sub 程序运行后，单击命令按钮，则Text1中显示的是( )。
单选题下列各排序法中，最坏情况下的时间复杂度最低的是( )。
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意，填空处应选择OptionBase1Dima(100)AsIntegerPrivateSubCommand1_Click()n=100Fori=2ToSqr(n)Forj=i+1TonIfjModi=0Anda(j)＜＞0Thena(j)=0NextjNextiFori=1TonIfa(i)＜＞0#ThenNextiEndSubPrivateSubForm_Load()Fori=1To100a(i)=iNextiEndSub
单选题组合框控件是将( )组合成一个控件。 A) 列表框控件和文本框控件 B) 标签控件和列表框控件 C) 标签控件和文本框控件 D) 复框控件和选项按钮控件
单选题有下面程序代码： Option Base 1 Private Sub Commandl—Click() Dim a(10)As Integer，x，b x=InputBox(“请输入一个多位整数”) For k=1 To Len(x) b=Mid(x，k，1) a(Val(b)+1)=a(Val(b)+1)+1 Next k For k=1 To 10 Print a(k)； Next k End Sub程序运行时，单击命令按钮Commandl，输入2355270224，则输出是( )。
单选题下列各种形式的循环中，输出“*”的个数最少的循环是{{U}} {{/U}}
A.a=5:b=8 Do Print " *
" a=a+1 Loop While
a＜b
B.a=5:b=8 Do Print " *
" a=a+1 Loop Until a＜b
C.a＝5:b＝8 Do Until a-b
Print " * " b=b+1
Loop
D.a=5:b=8 Do Until a＞b Print
" * " a=a+1 Loop
单选题现有语句：y=IIf(x＞0, x Mod 3, 0)设x=10，则y的值是
单选题下面关于算法的叙述中，正确的是( )。
单选题对于图片框和图像框，以下描述中正确的是
单选题双击窗体中的对象后，Visual Basic将显示的窗口是{{U}} {{/U}}。
A.项目(工程)窗口
B.工具箱
C.代码窗口
D.属性窗口
单选题下面语句中能够打开随机文件的是
单选题下面函数的功能应该是：删除字符串str中所有与变量ch相同的字符，并返回删除后的结果。例如：若str="ABCDABCD"，ch="B"，则函数的返回值为："ACDACD"
Function delchar(str As String，ch As String)As String
Dim k As Inlegcr，temp As String，ret As String
ret=""
For k=1 To Len(str)
temp=Mid(str，k，1)
If temp=ch Then
ret=ret＆temp
End If
Next k
delchar=ret
En d Function
但实际上函数有错误，需要修改，下面的修改方案中正确的是( )。
单选题单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer a=2：b=3：C=4 Print P2(c，b，A) End Sub Private Function P1(x As Integer，y As Integer，z As Integer) P1=2 * X + y + 3 * z End Function Private Function P2(x As Integer，y As Integer，z As Integer) P2=P1(z，x，y) + X End Function
单选题如果要改变窗体的标题，则需要设置的属性是