关系模型允许定义3类数据约束，下列不属于数据约束的是

A:实体完整性约束 B:参照完整性约束 C:属性完整性约束 D:用户自定义的完整性约束

下列SQL语句中，用于修改表结构的是

A:ALTER B:CREATE C:UPDATE D:INSERT

串的长度是

A:串中不同字符的个数 B:串中不同字母的个数 C:串中所含字符的个数且字符个数大于零 D:串中所含字符的个数

下列程序运行时输出的结果是
Private Sub Form_Click（　）
Dim x
x=Array(“天天向上”，“清华大学”，“天上人间”，“程序设计”)
For i=LBound(a，1)to UBound(a，1)
If Left(a(i)，1)=“天”Then Print a(i)；
Next
End Sub

A:天天向上 B:天天向上天上人间 C:出错信息 D:天天向上清华大学天上人间程序设计

下列说法错误的是

A:资源文件的扩展名为.res B:一个窗体对应一个窗体文件 C:Visual Basic中的一个工程只包含一个窗体 D:Visual Basic中一个工程最多可以包含255个窗体

以下哪个关键字声明的局部变量在整个程序运行中其值一直保留

A:Stafic B:Private C:Dim D:Pubic

单击命令按钮时，下列程序的运行结果为
Private Sub Command1_Click( )
Print Fun(23, 18)
End Sub
Public Function Fun(m As Integer, n As Integer) As Integer
Do Whilem ＜＞ n
Do While m ＞ n : m--m - n: Loop
Do While m ＜ n : n=n - m: Loop
Loop
Fun =m
End Function

B:1 C:3 D:5

在窗体上添加一命令按钮，名称为Command1，然后为该命令按钮编写如下事件过程，该过程的执行结果为
Option Base 1
Private Sub Command1_Click（　）
Dim a As Variant
a=Array(1，2，3，4)
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next
Print s
End Sub

A:4321 B:1234 C:34 D:12

在窗体上添加一命令按钮，其名为Command1，然后编写代码如下。
private Sub Command1_Click（　）
Dim arr(5)As Integer，arr1(5)As Integer
n=3
For i=1 To 5
an(i)=i
arrl(n)=2*n+i
Next
Print arr1(n)；arr(n)
End Sub
程序的运行结果为

A:3 11 B:11 3 C:13 3 D:3 13

有如下函数过程。
Function Fun( By Val x As Integer,By Val y As Integer) As Integer
Do While y ＜＞ 0
reminder = x Mod y
xmy
y = reminder
Loop
Fun = x
End Function
以下调用函数的事件过程，该程序的运行结果是
Private Sub CommandT_Click( )
Dim a As Integer,b As Integer
a = 100:b =25
x =Fun(a,B)
Print x
End Sub

B:25 C:50 D:100