在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式(作图)计算，在窗体上设计3个文本框，名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中，请在空白处填入适当语句使程序完整。

 Private Sub Command1_Click()

  Dim r As Integer，n As Integer

  n=Text1

  r=Text2

  Text3=fun(n)/(______)/fun(r)

 End Sub

 Function fun(n As Integer)As long

Dim t As Long

______

 For k=1 To n

  t=t*k

 Next k

 fun=t

 End Function

在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式(作图)计算，在窗体上设计3个文本框，名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中，请在空白处填入适当语句使程序完整。

 Private Sub Command1_Click()

  Dim r As Integer，n As Integer

  n=Text1

  r=Text2

  Text3=fun(n)/(______)/fun(r)

 End Sub

 Function fun(n As Integer)As long

Dim t As Long

______

 For k=1 To n

  t=t*k

 Next k

 fun=t

 End Function

在窗体上添加十个命令按钮，然后编写如下事件过程：

 Private Sub Command1_Click()

 sum＝0

 For i＝3 To 7

 sum＝i+2

 Next i

 MsgBox sum+i

 End Sub

 打开窗体后，单击命令按钮，消息框的输出结果是______。

在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1)，然后编写如下事件过程：

 Private Sub Command1_Click()

 x＝Val(Text1.Text)

 Select Case x

 Case 1,3

 y＝x*x

 Case IS＞＝10,IS＜＝-10

 y＝x

 Case-10 To 10

 y＝-x

 End Select

 End Sub

 程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。

函数______返回值的含义是返回系统当前日期和当前时间。

执行以下程序段后，x的值为______。

 Dim x As Integer,i As Integer

 x＝0

 For i＝20 To 1 Step -2

 x＝x+i\5

 Next i

在使用Dim语句定义数组时，在缺省情况下数组下标的下限为______。

如果要查询学生表中年龄在一定范围区间的记录，要求用户使用查询时输入区间条件，那么应该采用的查询方式是______。

当关系中的某个属性或属性组合不是该关系的主关键字，但却是另一个关系的主关键字时，称该属性或属性组合为这个关系的______。

关系模型的完整性规则是对关系的某种约束条件，包括实体完整性、______和自定义完整性。

数据模型按不同的应用层次分为三种类别，它们是______数据模型、逻辑数据模型和物理数据模型。