栈底至栈顶依次存放元素A、B、C、D，在第五个元素E入栈前，栈中元素可以出栈，则出栈序列可能是

A:ABCED B:DCBEA C:DBCEA D:CDABE

有如下程序： Private Sub Form_Click（　） E=1：F=1 For i=1 To 3 E=E+F:F=F+E Next Print E；F End Sub 该程序的输出结果是

A:6 6 B:5 8 C:13 21 D:34 55

下列程序段的执行结果为 a=5 For k=1 To 0 a=a * k Next k Print k；a

A:-1 6 B:-1 16 C:1 5 D:11 21

一个工程中含有窗体Form1、Form2和标准模块Modell，如果在Form1中有语句Public X As Integer，在Modell中有语句Public Y As Integer。则以下叙述中正确的是

A:变量X、Y的作用域相同 B:Y的作用域是Modell C:在Form1中可以直接使用X D:在Form2中可以直接使用X和Y

在窗体中添加一个命令按钮，编写如下程序： Private Sub Sub1(p，m，n) p=p+1：m=m+1：n=n+1 Print "sub1："；p；m；n End Sub Private Sub Command1_Click（　） a1=1：b=2：c1=3 Call Sub1(a，b1+3，c1) Print"Main："；a1；b1；c1 End Sub 程序运行后，输出结果为

A:Sub： 2 6 4 Main： 2 6 4 B:Sub： 2 6 4 Main： 2 6 4 C:Sub： 2 6 4 Main： 1 2 3 D:Sub： 2 6 4 Main： 2 2 3

下列关系运算结果为True的是

A:“1”+2=“12” B:“1”+2=“3” C:“1”#2=“12” D:“1”&2=“3”

实体是信息世界中广泛使用的一个术语，它用于表示

A:有生命的事物 B:无生命的事物 C:实际存在的事物 D:一切事物

要将窗体Form1标题设为“学习VB”以下能正确实现该功能的语句为

A:Form1.Name=“学习VB” B:Form1.Visible="学习VB" C:Form1.Caption="学习VB" D:Form1.Show="学习VB"

运行下面的程序后，输出的结果为 Cls Dim t(5, 5) as Integer For i=1 To 5: t(i,i) =1: Next For i = 1 To 5 For j = 1 To 5 Print t(i, j), Next Print Next

A:1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 B:1 1 1 1 1 C:1 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 1 D:1 1 1 1 1

设y是整形变量，能判断y为奇数的表达式是

A:Not(y Mod 2＜＞0) B:y Mod 2＜＞0 C:(y-1)Mod 2＜＞0 D:y Mod 2＜＞1