已知一顺序表A，其元素值非递减有序排列，编写一个算法删除顺序表中多余的值相同的元素。

(1)在长度为n的顺序存储的线性表中删除一个元素，最坏情况下需要移动表中的元素个数为n-1____。

(2)设循环队列的存储空间为Q(1:30)，初始状态为front=rear=30。现经过一系列入队与退队运算后，front=16，rear=15，则循环队列中有___29___个元素。

(3)数据库管理系统提供的数据语言中，负责数据的增、删、改和查洵的是___数据库操纵语言___。

(4)在将E-R图转换到关系模式时，实体和联系都可以表示成。__关系____。

(5)常见的软件工程方法有结构化方法和面向对象方法，类、继承以及多态性等概念属于__面向对象法____。

(6)Access的查询分为5种类型，分别是选择查询、参数查询、操作查洵、SQL查询和_交叉表查询_____查询。

(7)如果要求用户输入的值是一个3位的整数，那么其有效性规则表达式可以设置为______。

(8)在工资表中有姓名和工资等字段，若要求查询结果按照工资降序排列，可使用的SQL语句是：SELECT姓名，工资FROM工资表ORDER BY工资_DESC_____。

(9)在宏中引用窗体控件的命令格式是______。

(10)已知：Dim rs As new ADODB RecordSet，在程序中为了得到记录集的下一条记录，应该使用的方法是rs.______。

(11)在VBA中，没有显式声明或使用符号来定义的变量，其数据类型默认是______。

(12)下列程序的功能是：输入10个整数，逆序后输出。请在程序空白处填入适当语句使程序完成指定的功能。

Pnvafe Sub Command2_Click()

Dim i, j, k, temlp, arr(11)As Integer

Dim result As Scring

For k=1 T0 10

arr (k)=Val(InputBox("请输入第" ＆k＆"个数："，"数据输入窗口"))

Nexc k

i=1

i=10

Do

temp=arr(i)

arr(i)=arr(i)

arr(j)=temp

i=i+1

j= (12)

Loop While (13)

rpsult""

For k=1 TO 10

result=result ＆ arr(k) ＆ Chr(13)

Next k

MsgBox result

End Sub

(13)已经设计出一个表格式窗体，可以输出教师表的相关字段信息。请按照以下功能要求补充设计：改变当前记录，消息框弹出提示“是否删除该记录？”，单击“是”，则直接删除该当前记录；单击“否”，则什么都不做。其效果图如下：

单击“退出”按钮，关闭窗体。

Private Sub btnCancel_Click()

(14)

End Sub

表格式窗体当前记录变化时触发

Private Sub Form. Current()

If MsgBox("是否删除该记录？"，vbQuestion+vbYesNO，"确认")=

vbYes Then

(15)

End If

End Sub