sp;  Access数据库中的字节(Byte)数值类型在数据库中占        字节。

(7)       在报表重要显示格式为“第N页”的页码，页码格式设置是：=”第” &          & “页”。

(8)       要将Access数据库中保存的数据发布到网络上，可以采用的对象是        。

(9)       若窗体名称为Form1，则将该窗体标题设置为”Access窗体”的语句是        。

(10)   下列程序段得功能是求1到100的累加和。请在空白处填入适当的语句，是程序完成指定的功能。

Dim s As Integer , m As Integer

s = 0

m = 1

do While         

s = s +m

m = m+1

Loop

(11)   下列程序的功能是求算式：1-1/2+1/3-1、4+……前30项之和。请在空白处填入适当的语句，使程序可以完成指定的功能。

Private Sub Command1_Click()

Dim i as integer , s as single , f as integer

s = 0 : f = 1

For i =1 To 30

    s = s + f/i

    f=       

Next i

Debug.Print “1-1/2+1/3-1/4+……”; s

End Sub

(12)   有一个标题为“登录”的用户登录窗体，窗体上有两个标签，标题分别为“用户名：”和“密码：”，用于输入用户名的文本框名为“UserName”，用于输入密码的文本框名为“UserPassword”，用于进行倒计时显示的文本框名为“Tnum”，窗体上有一个标题为“确认”的按钮名为“OK”，用于输入完用户名和密码后单击此按钮确认。

    输入用户名和密码，如用户名或密码错误，则给出提示信息：如正确，则显示“欢迎使用！”信息。要求整个登录过程要在30秒中完整，如果超过30秒还没有完成正确的登录操作，则程序给出提示自动终止整个登录过程。请在程序空白处填入适当的语句，使程序完成指定的功能。

    Option Compare Database

    Dim Second As Integer

    Private Sub Form_Open(Cancel As Integer)

        Second=0

    End Sub

   

    Private Sub Form_Timer()

        If Second >30 Then

            MsgBox “请在30秒钟登录”,vbCritical,”警告”

            DoCmd.Close

        Else

            Me!Then = 30 – Second           ‘倒计时显示

        End If

        Second =         

    End Sub

 

    Private Sub OK_Click()

        If Me.UserName <> “123” Or Me.UserPassword <> “456” Then

            MsgBox “错误!”+ “您还有” & 30-Second & “秒”,vbCritical,”提示”

        Else

            Me.TimerInterval =            ‘终止Timer事件继续发生

            MsgBox “欢迎使用！”,vbInformation,”成功”

            DoCmd.Close

        End If

        End Sub

(13)   数据库中有“平时成绩表”，包括“学号”、“姓名”、“平时作业”、“小测验”、“期中考试”、“平时成绩”和“能否考试”等字段，其中

首页 上页 4 5 6 下页 尾页 5/9/9