单选题编写如下程序：Private Sub Command1_Click() Dim i As Integer， j As Integer n＝InputBox("输入一个大于1的正整数") For i＝2 To n For j＝2 To Sqr(i) If i Mod j＝0 Then Exit For Next j If j>Sqr(i)Then Print i Next iEnd Sub该程序的功能是( )。
单选题以下关于控件数组的叙述中，错误的是
单选题标准模块中有如下程序代码： Public x As Integer，Y As Integer Sub TempSub() x＝10：y＝20 End Sub 在窗体上有1个命令按钮，并有如下事件过程： Privme Sub Command1_Click() Dim x As Integer Call TempSub x＝x＋100：y＝y＋100 Print x；Y End Sub 运行程序后单击命令按钮，窗体上显示的是( )。
单选题表达式(7/3+1)*(18/5-1)的值是( )。
单选题设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发______。 A) 窗体的GotFocus事件 B) Text1的SetFocus事件 C) Text1的GotFocus事件 D) Text1的LostFocus事件
单选题在窗体上有多个控件，要实现程序运行后焦点默认在某一控件上，应该设置的属性是（ ）。
单选题以下不能用Print方法输出数据的对象或窗口是
单选题窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序 PrivateSubCommandl_Click() Dimn IfText1.Text<>"23456"Then n=n+1 Print"口令输入错误"&n&"次" EndIf EndSub 希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是
单选题下列叙述中正确的是( )。 A) 线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的 B) 线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C) 线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构 D) 线性表的链式存储结构与顺序存储结构在存储空间的需求上没有可比性
单选题下面Change事件过程中，文本框控件Text1用来接收数字字符的输入，该事件过程的作用是（ ）。
Private Sub Text1_Change ( )
Text2．Text=Str(6．28* Val(Text1．Text))
End Sub
单选题下列程序的执行结果为( )。 Private Sub Command1_Click() Dim FirStr As String FirStr="abcdef" Print Pat(FirStr) End Sub Private Function Pat(xStr As String) As String Dim tempStr As String, strLen As Integer tempStr="" strLen=Len(xStr) i=1 Do While i＜＝Len(xStr)-3 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr, strLen -1+1,1) i=i+1 Loop Pat=tempStr End Function A) abcdef B) afbecd C) fedcba D) defabc
单选题设用复制、粘贴的力怯建立了一个命令安钮数组Command1，以下列该数组说法错误的是
单选题在窗体上画三个标签、三个文本框(名称分别为Text1、Text2、Text3)和一个命令按钮(名称为Command1)，外观如下图所示。编写如下程序：PrivateSubForm_Load()Text1.Text=""Text2.Text=""Text3.Text=""EndSubPrivateSubCommand1_Click()x=Val(Text1.Text)y=Val(Text2.Text)Text3.Text=f(x,y)EndSubFunctionf(ByValxAsInteger,ByValyAsInteger)DoWhiley＜＞0tmp=xModyx=yy=tmpLoopf=xEndFunction运行程序，在Text1文本框中输入36,在Text2文本框中输入24，然后单击命令按钮，则在Text3中显示的内容是______。A)4B)6C)8D)12
单选题下窗体上有名称为Command1的命令按钮和名称为Text1的文本框
Private Sub Command1_Click()
Text1.Text="程序设计"
Text1.SetFocus
End Sub
Private Sub Text1_GotFocus()
Text1.Text="等级考试"
End sub
运行以上程序，单击命令按钮后______。
单选题窗体上有一个列表框和一个文本框，编写如下两个事件过程： Private Sub Form_Load() List1.AddItem"北京" List1.AddItem"天津" List1.AddItem"上海" Text1.Text=" " End Sub Private Sub List1_Click() Print Text1.Text+List1.Text End Sub 程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果为( )。
单选题窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是{{U}} {{/U}}。
Private Sub Commandl_Click()
Picturel.Picture=LoadPicture("c：/picture.jpg")
Picmrel.Cls Picturel.Print "picture"
End Sub
A. 窗体无显示，图片框显示图片和文字picture
B. 窗体上出现picture文本，图片框无显示
C. 窗体上出现picture文本，图片框显示图片picture.jpg
D. 窗体无显示，图片框只显示picture文字
单选题在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。 For i= 1 To4 For j = 1 To 3 x=3 Fork= 1 To 2 x=x+3 Next k Next j Next i Text1.Text=Str(x)
单选题下列描述中，不符合良好程序设计风格要求的是
单选题窗体上有一个名称为CDl的通用对话框，一个名称为。rextl的文本框，窗体的单击事件过程如下： Private Sub Form—Click() CDI．DialogTitle=“改变颜色” CDl．Color=Forml．BackColor CDI．Action=3 Text1．BackColor=CDl．Color End Sub 运行程序时，单击窗体，则以下叙述中错误的是( )。
单选题在窗体上画1个名称为Command1的命令按钮，并编写如下事件过程：
Private Sub Command1_Click()
x=1:s=0
For i=1 To 5
x=x/i:s=s+x
Next
Print s
End Sub
该事件过程的功能是计算