单选题在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String
Str=Chr(KeyAscii)
KeyAscii=Asc(UCase(str))
Text1.Text=String(2,KeyAscii)
End Sub程序运行后，如果在键盘上输入字母"b"，则在文本框Text1中显示的内容是
单选题设窗体文件中有下面的事件过程： Private sub Command1_Click() Dim S a%=100 Print a End Sub 其中变量a和s的数据类型分别是( ) A．整型，整型 B．变体型，变体型 C．整型，变体型 D．变体型，整型
单选题1个三维数组可以存放1个矩阵。在程序开始有语句Option Base o,则下面定义的数中正好可以存放1个4x3矩阵(即只有12个元素)的是【 】
单选题在窗体上画一个名称为Command1的命令按钮。单击命令按钮时执行如下事件过程：
Private Sub Command1 Click()
a$=”software and hardware”
b$=Right(a$，8)
c$=Mid(a$，L，8)
MsgBox a$，，bs，CS，1
End sub
则在弹出的信息框标题栏中显示的标题是( )。
单选题有下面的程序段：A = 1.2B = 321C = Len(Str(A) + Str(B))Print C执行上面的程序段，输出结果是
单选题以下不能输出“Program”的语句是
单选题执行语句Open "TC.dat" For Random As #1 Len=50后，对文件TC.dat中的数据能执行的操作是( )。 A) 只读操作 B) 只写操作 C) 既可以读，也可以写 D) 追加操作
单选题设a=5，b=6，c=7，d=8，则执行下列语句后，x的值为______。 X=IIF((a＞B) And(c＜D) ,10,20)
单选题下面关于多重窗体的叙述中，正确的是( )。
单选题要使一个图片框控件能自动地附着在窗体的一条边上，应设置它的( )属性。
单选题有下列程序：程序最后打印结果是______。
单选题窗体上有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