单选题已知一棵二叉树的前序遍历为ABDECF,中序遍历为DBEAFC,则对该树进行后序遍历得到的序列为________。
单选题窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x = Val( InputBox ("输入数据") ) Text1 = Str( x + fun(x) + fun(x) ) End Sub Private Function fun(ByRef n As Integer) If n Mod 3 = 0 Then n=n+n Else n=n*n End If fun=n End Function 对于上述程序,以下叙述中错误的是( )。 A) 语句fun=n有错,因为n是整型,fun没有定义类型 B) 运行程序,输入值为5时,文本框中显示655 C) 运行程序,输入值为6时,文本框中显示42 D) ByRef表示参数按址传递
单选题以下关系表达式中,其值为False的是
A."ABC">"AbC"
B."the"<>"they"
C."VISUAL"=Ucase("visual")
D."Integer">"Int"
单选题设有如下程序:
Private Sub Form_Click()
a=10:b=20
x=a=b
Print x
End Sub
程序运行后,单击窗体,输出结果为______。
单选题下面四个选项,不是事件或语句的是( )
单选题窗体上有一个名称为Picturel的图片框控件,一个名称为Label1的标签控件,如下图所示。现有如下程序:PublicSubdisplay(xAsControl)IfTypeOfxIsLabelThenx.Caption="计算机等级考试"Elsex.Picture=LoadPicture("pic.jpg")EndIfEndSubPrivateSubLabell_Click()Calldisplay(Labell)EndSubPrivateSubPicture1_Click()Calldisplay(Picture1)EndSub对以上程序,下列叙述中错误的是()。
单选题在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 do Until x=-1 a=InputBox("请输入a的值") a=Val(a) b=InputBox("请输入b的值") b=Val(b) x=InputBox("请输入X的值") x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1则输出结果是( )。
单选题下列程序段正确的是( )。
单选题若要把窗体上命令按钮Commandl的状态设置为不可用,应该执行的命令是
单选题设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程: Private Sub Command1_Click() Dim s As String,ch As String s = " " For k = 1 To Len(Text1) ch = Mid(Text1, k, 1) s = ch + s Next k Text1. Text = s End Sub 程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是( )。 A) Basic B) cisaB C) BASIC D) CISAB
单选题在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中(见图)。下面能实现此功能的事件过程是{{U}}{{/U}}。A.PrivateSubCheck1_Click(IndexAsInteger)Text1.Text=""Fork=0To3IfCheck1(k).Value=1ThenText1.Text=Text1.Text&Check1(k).Caption&""'双引号中是空格EndIfNextkEndSubB.PrivateSubCheck1_Click(IndexAsInteger)Fork=0To3IfCheck1(k).Value=1ThenText1.Text=Text1.Text&Check1(k).Caption&""'双引号中是空格EndIfNextkEndSubC.PrivateSubCheck1_Click(IndexAsInteger)Text1.Text=""Fork=0To3IfCheck1(Index).Value=1ThenText1.Text=Text1.Text&Check1(Index).Caption&""'双引号中是空格EndIfNextkEndSubD.PrivateSubCheck1_Click(IndexAsInteger)Text1.Text=""Fork=0To3IfCheck1(k).Value=1ThenText1.Text=Text1.Text&Check1(k).Caption&""'双引号中是空格ExitForEndIfNextkEndSub
单选题在窗体模块中用Public定义的变量的作用范围是
单选题利用E-R模型进行数据库的概念设计,可以分成三步:首先设计局部E-R模型,然后把各个局部E-R模型综合成一个全局的模型,最后得到最终的E-R模型需对全局E-R模型进行
单选题在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下程序:
Dim S1 As String,S2 As String
Private Sub Form_Load()
Text1.Text=""
Text2.Text=""
Text1.Enabled=False
Text2.Enabled=False
End Sub
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
S2=S2&Chr(KeYCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
S1=S1&Chr(KevAscii)
End Sub
Private Sub Command1_Click()
Text1.Text=S1
Text2.Text=S2
S1=""
S2=""
End Sub
程序运行后,先后按“a”、“b”、“c”键,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为______。
单选题在窗体上有一个名称为List1的列表框和一个名称为Command1的命令按钮,并编写有如下事件过程: Private Sub Form_Load() List1.AddItem "Item1":List1.AddItem"Item2":List1.AddItem"Item3" End Sub Private Sub Command1_Click() List1.List(List1.ListCount)="New Item" End Sub 程序执行时,单击命令按钮,其结果为( )。
单选题现有如下程序:Private Sub Commandl_Click() s=0 For i=1 To 5 s=s+f(5+i) Next Print sEnd SubPublic Function f(x As Integer) If x>=10 Then t=x+1 Else t=x+2 End If f=tEnd Function 运行程序,则窗体上显示的是
单选题下面是求100以内素数的程序,下面说法正确的是( )
Private Sub Command1_Click( )
Dim i As Integer, m As Integer, tag As Boolean
For m = 2 To 100
tag = True
For i = 2 To m - 1
If m Mod i = 0 Then tag = False
Next i
If tag=true Then Print m
Next m
End Sub
单选题在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:
Private Sub Form_Load() List1.AddItem"Item 1"
List1.AddIrem"tem 2" List1.AddItem"Item
3" End Sub Private Sub
Command1_Click()
List1.List(List1.Listcount)="AAAA" End Sub
程序运行后,单击命令按钮,其结果为
A. 把字符串"AAAA"添加到列表框中,但位置不能确定
B. 把字符串"AAAA"添加到列表框的最后(即"Item 3"的后面)
C. 把列表框中原有的最后一项改为”AAAA"
D. 把字符串"AAAA"插入到列表框的最前面(即"Item 1"的前面)
单选题下列各项中,不是通用过程特点的是( )。
单选题窗体上有一个命令按钮Command1和一个列表框List1,其中List1有0、1、2、3、4内容,有下列程序: Private Sub Command1_Click( ) Dim i,s For i=0 To List1.ListCount s=s+List1.List(i) Next i Print s End Sub 程序运行后,单击命令按钮,则窗体上显示的是______。
