填空题已知序列17,18,60,40,7,32,73,65,85,采用冒泡排序法对该序列作降序排序时,第四趟的结果是 【1】 。
填空题在窗体上画一个命令按钮,然后编写如下程序:
Function fun (By Val num As Long)As Long
Dim k As Long
k=1
num = Abs(num)
Do While num
k=k*(num/10)
num=num/10
Loop
fun=k
End Function
Private Sub Command l-Click {)
Dim n As Long
Dim r As Long
n=Input Box (“请输入一个数”)
n=CLng (n)
r=fun (n)
Ms g Boxr
End Sub
程序运行后,单击命令按钮,在输入对话框中输入234,消息框显示的结果为{{U}} 【14】 {{/U}}.
填空题已知如下程序段: Dim AnyString,MyStr AnyString="Hello World" MyStr=Right(AnyStfing,1) 执行以上程序段后,MyStr为______。
填空题排序是计算机程序设计中的一种重要操作,常见的排序方法有插入排序、【 】和选择排序等。
填空题返回字符表达式的字符个数,当字符表达式为Null时,返回Null值的函数为______。
填空题假设变量intVar为一个整型变量,则执行赋值语句intVar="2"+3之后,变量intVar的值是 【14】 。
填空题自动编号数据类型占四个字节的空间,即它是以______存于数据库中。
填空题Access中,文本框分为三种类型:结合型、非结合型与 【8】 。
填空题在窗体上添加十个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() sum=0 For i=3 To 7 sum=i+2 Next i MsgBox sum+i End Sub 打开窗体后,单击命令按钮,消息框的输出结果是______。
填空题数据访问页主要有两种视图方式:页视图和{{U}} 【13】 {{/U}}。
填空题设置窗体的属性实际上是设计窗体的______。
填空题假设有一个“图书订单表”,其字段分别为书名、单价和数量,若以此表为数据源创建一个窗体,在窗体中设置一个计算订购总金额的文本框,那么“控件来源”属性值为{{U}} 【8】 {{/U}}。
填空题Access中,超级链接地址最多包含3部分:Displaytext、{{U}} 【8】 {{/U}}、Subaddress。
填空题下列子过程的功能是:将当前数据库文件中“学生表”的学生“年龄”都加1。请在程序空白的地方填写适当的语句,使程序实现所需的功能:
Private Sub SetAgePlus1_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim fd As DAO.Field
Set db = CurrentDb()
set rs = db.OpenRecordset("学生表")
Set fd= rs.Fields("年龄")
Do While Not rs.EOF
rs.Edit
fd = 【 】
rs.Update
【 】
Loop
rs.Close
db.Close
Set rs = Nothing
Set db = Nothing
End Sub
填空题Access用参照完整性来确保表中记录之间 【10】 的有效性,并不会因意外而删除或更改相关数据。
填空题在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1),然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer,y As Integer,z As Integer a=5,b=10,c=0 Me!Text1="" Call p1(a,b,c) Me!Text1=c End Sub Sub p1(x As Integer,y As Integer,z As Integer) z=x+y End Sub 打开窗体运行后,单击命令按钮,文本框中显示的内容是______。
填空题在向数据库中输入数据时,若要求所输入的字符必须是字母,则应该设置的输入掩码是______
填空题Access提供了________、逻辑运算符和特殊运算符。
填空题窗体中的数据主要来源于 【13】 和 【14】。
填空题现有用户登录界面如下:窗体中名为username的文本框用于输入用户名,名为pass的文本框用于输入用户的密码。用户输入用户名和密码后,单击“登录”名为login的按钮,系统查找名为“密码表”的数据表,如果密码表中有指定的用户名且密码正确,则系统根据用户的“权限”分别进入“管理员窗体”和“用户窗体”:如果用户名或密码输入错误,则给出相应的提示信息。密码表中的字段均为文本类型,数据如下图所示。单击“登录”按钮后相关的事件代码如下,请补充完整。PrivateSublogin_Click()DimstrAsStringDimrsASNewADODB.RecordsetDimfdAsADODB.FieldSeten=CurrentProjeet.Connectionlogname=Trim(Me!username)pass=Trim(Me!pass)IfLen(Nz(logname))=0ThenMsgBox"请输入用户名"ElseIfLen(Nz(pass))=0ThenMsgBox"请输入密码"Elsestr="select*from密码表where用户名="&logname&"and密码="&passrs.Openstr,cn,adopenDynamic,adLockOptimistic,adCmdTextIf{{U}}(14){{/U}}ThenMsgBox"没有这个用户名或密码输入错误,请重新输入"Me.username=""Me.pass=""ElseSet{{U}}(15){{/U}}=rs.Fields("权限")Iffd="管理员"ThenDoCmd.CloseDoCmd.OpenForm"管理员窗体"MsgBox"欢迎您,管理员"ElseDoCmd.CloseDoCmd.OpenForm"用户窗体"MsgBox"欢迎使用会员管理系统"EndIfEndIfEndIfEndSub
