单选题在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：
Option Base 0
Private Sub Command1_Click()
Dim A1(4)As Integer,A2(4)As Integer
For k=0 To 2
A1(k+1)=InputBox("请输入一个整数")
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，输出结果为
单选题设组合框Combol中有3个项目，则以下能删除最后一项的语句是( )。 A) Combol.RemoveItem Text B) Combol RemoveItem 2 C) Combol.RemoveItem 3 D) Combol.RemoveItem Combol.Listcount
单选题下面是求最大公约数的函数的首部： Function gcd(ByVal x As Integer,ByVal y As Integer)As Integer 若要输出8、12、16这3个数的最大公约数，下面正确的语句是( ) A．Print gcd(8,12)，gcd(12,16),ged(16,8) B．Print ged(8,12,16) C．Print gcd(8),gcd(12),ged(16) D．Print gcd(8,gcd(12,16))
单选题下列程序段的执行结果为______。 K=0 For I=1 To 3 A=I^I^K print A； Next I
单选题在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是A) 路径的集合 B) 循环的集合 C) 目标的集合 D) 地址的集合
单选题将E—R图转换为关系模式时，实体和联系都可以表示为( )。
单选题以下关于函数过程的叙述中，正确的是( )。 A) 函数过程形参的类型与函数返回值的类型没有关系 B) 在函数过程中，过程的返回值可以有多个 C) 当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递 D) 如果不指明函数过程参数的类型，则该参数没有数据类型
单选题目录列表框中的{{U}} {{/U}}属性用来设置和返回目录列表框中当前选中的目录。
A. Drive
B. Path
C. Name
D. Pattern
单选题下面程序执行时，输出的结果是( )。 Private Sub Form_Click() DimiASInteger,j As Integer i=10 Do i=i+j forj=10 toistep-3 i=i+j nextj Loop Whilei＜50 Printi;j End Sub
单选题为了清除列表框中指定的项目，应使用的方法是( )。 A) Cls B) Clear C) Remove D) RemoveItem
单选题为了使文本框同时具有垂直和水平滚动条，应先把MultiLine属性设置为True，然后再把Scrollbars属性设置为( ) A．0 B．1 C．2 D．3
单选题设有如下通用过程： Public Sub Fun(a( )As Integer，x As Integer) For i=1 TO 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程： Private Sub Command1_Cliek( ) Dim arr(5) As Integer，n As Integer For i=1 To 5 arr(i)=i+i Next Fun arr，n Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是
单选题数据库是什么的集合，它具有统一的结构格式并存放于统一的存储介质，可被各个应用程序所共享?
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 6: y = 7 Do y = y - x Debug. Print y; x=x+1 Loop While x＜= 0 Print y; x End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 A) 7 9 B) 34 0 C) 1 7 D) 死笔循环
单选题下面程序段的功能是______ 。 A=10.5 B=Int (A=0.6) Debug. Print B
单选题设工程中有2个窗体：Form1、Form2，Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为“Teacher”，所有菜单都可见；否则看不到“成绩录入”菜单项。为此，某人在Forml窗体文件中编写如下程序：
菜单结构
标题
名称
级别
成绩管理
mark
1
成绩查询
query
2
成绩录入
input
3 Private Sub
Text11_KeyPress (KeyAscii As Integer) If KeyAscii=13
Then If Text1.Text="Teacher"Then
Form2.input.Visible=True Else
Form2.input.Visible=False End If End
If Form1.Hide Form2.Show End
Sub 程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是______。
A.把Form1中Text1文本框及相关程序放到Form2窗体中
B.把Form1.Hide、Form2.Show两行移到2个End If之间
C.把If KeyAscii=13 Then改为If KeyAscii=”Teacher”Then
D.把2个Form2.input.Visible中的“Form2.”删去
单选题窗体上有文本框Text1和一个菜单，菜单标题、名称见表，结构如图所示。要求程序执行时单击“保存”菜单项，则把其标题显示在Text1文本框中，下面可实现此功能的事件过程是()。
单选题如果A为整数，且|A|＞=100，则打印"OK"，否则打印"Error"，表示这个条件的单行 格式If语句是{{U}}
{{/U}}。
A.If int(A)=AAnd Sqr(A)＞=10ThenPrint"OK"ElsePrint"Error"
B.IF Fix(A)=AAndAbs(A)＞=100Then Print"OK"Else Print"Error"
C.IF Int(A)=AAnd(A＞=100,A＜=-100)ThenPrint"OK"ElsePrim"Error"
D.If Fix(A)=AAndA＞=100,AndA＜=-100ThenPrint"OK"ElsePrint"Error"
单选题以下变量名中合法的是( )。
单选题在程序测试中，为了成功地测试设计数据，目前产生这些测试用例主要依赖于( )。