2. 计算机
  3. “用户表”中包含4个字段：用户名(文本，主关键字)，密码(文本)，登录次数(数字)，最近登录时间(日期／时间)。在“登录界面”的窗体中有两个名为tUser和tPassword的文本框，一个登录按钮CommandO。进入登录界面后，用户输入用户名和密码，点击

“用户表”中包含4个字段：用户名(文本，主关键字)，密码(文本)，登录次数(数字)，最近登录时间(日期／时间)。在“登录界面”的窗体中有两个名为tUser和tPassword的文本框，一个登录按钮CommandO。进入登录界面后，用户输入用户名和密码，点击

admin2020-07-25  25
问题 “用户表”中包含4个字段：用户名(文本，主关键字)，密码(文本)，登录次数(数字)，最近登录时间(日期／时间)。在“登录界面”的窗体中有两个名为tUser和tPassword的文本框，一个登录按钮CommandO。进入登录界面后，用户输入用户名和密码，点击登录按钮后，程序查找“用户表”。如果用户名和密码全部正确，则登录次数加1，显示上次的登录时间，并记录本次登录的当前日期和时间；否则，显示出错提示信息。
为完成上述功能，请在程序中【    】处填入适当语句。
Private Sub Command0_Click()
Dim cn As New ADoDB．Connection
Dim rs As New ADODB．Recordset
Dim fd1 As ADODB．Field
Dim fd 2As ADODB．Field
Dim strSQ LAs String
Setcn=CurrentProject．Connection
strSQL="Select登录次数，最近登录时间From用户表Where用户名=’"&Me!tUser&"’And密码=’"&Me!tPassword&"’"
rs．Open strSQL，ca，adOpenDynamic，adLockOptimistic，adCmdTextSet fd11=rs．Fields("登录次数")
Set fd2=rs．Fields("最近登录时间")
If Not rs．EOF Then
fd1=fd1+1
MsgBox”用户已经登录："&fd1&"次"&Chr(13)&Chr(13)&"上次登录时间："&fd2
fd2=Now()
【    】
Else
MsgBox"用户名或密码错误。"
End If
rs．Close
cn．Close
Set rs=Nothing
Set cn=Nothing
End Sub
选项 A、rs．Update
B、Update
C、rs．Change
D、Change
答案A
解析 本题中的if语句是是否到文件结尾，当执行更新操作fd1=fd1+1；fd2=Now()之后，都需要使用rS．update语句将所更新的记录数据存储到数据库中，所以选项A正确。
转载请注明原文地址:https://kaotiyun.com/show/Tkcp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)