1187
社区成员
帮我看看吧！！！
Private Sub cmdOK_Click()
If Trim(cboUsername.Text) <> "" Then
UserRst.MoveFirst
'在myRecordset中找出与用户名组合框中显示的用户名相符的一条记录信息
UserRst.Find "用户名='" & cboUsername.Text & "'"
'判断是否存在该用户名
If UserRst.EOF = False Then
'判断此条记录中的"密码"字段信息与密码框中的写入信息是否相同，并且屏蔽了大小写以及有无空格的区别
If UCase(Trim(UserRst.Fields("密码").Value)) <> UCase(Trim(txtPassword.Text)) Then
MsgBox "密码或用户名有误，请重新输入！", vbExclamation, "提示"
txtPassword = ""
txtPassword.SetFocus
Else
Username = cboUsername.Text
Me.Hide
frmMain.Show
End If
Else
MsgBox "该用户名不存在，请重新输入！", vbExclamation, "警告"
cboUsername.SetFocus
End If
Else
MsgBox "用户名不可为空值，请重新输入！", vbExclamation, "提示"
cboUsername.SetFocus
End If
End Sub
为什么“If UserRst.EOF = False Then”这个语句可以判断出UserRst记录集中是否存在cboUsername.Text 中显示的用户名呢？还有到底find的用法是怎么样的呢？请不吝赐教！！谢谢！！
If Trim(cboUsername.Text) <> "" Then
UserRst.MoveFirst
'在myRecordset中找出与用户名组合框中显示的用户名相符的一条记录信息
UserRst.Find "用户名='" & cboUsername.Text & "'"
'判断是否存在该用户名
If UserRst.EOF = False Then
'判断此条记录中的"密码"字段信息与密码框中的写入信息是否相同，并且屏蔽了大小写以及有无空格的区别
If UCase(Trim(UserRst.Fields("密码").Value)) <> UCase(Trim(txtPassword.Text)) Then
MsgBox "密码或用户名有误，请重新输入！", vbExclamation, "提示"
txtPassword = ""
txtPassword.SetFocus
Else
Username = cboUsername.Text
Me.Hide
frmMain.Show
End If
Else
MsgBox "该用户名不存在，请重新输入！", vbExclamation, "警告"
cboUsername.SetFocus
End If
Else
MsgBox "用户名不可为空值，请重新输入！", vbExclamation, "提示"
cboUsername.SetFocus
End If
End Sub
为什么“If UserRst.EOF = False Then”这个语句可以判断出UserRst记录集中是否存在cboUsername.Text 中显示的用户名呢？还有到底find的用法是怎么样的呢？请不吝赐教！！谢谢！！
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
阿甘 2003-04-06
MSDN里的Find
Find Method
Searches a Recordset for the record that satisfies the specified criteria. If the criteria is met, the recordset position is set on the found record; otherwise, the position is set on the end of the recordset.
Syntax
Find (criteria, SkipRows, searchDirection, start)
Parameters
criteria A String containing a statement that specifies the column name, comparison operator, and value to use in the search.
SkipRows An optional Long value, whose default value is zero, that specifies the offset from the current row or start bookmark to begin the search.
searchDirection An optional SearchDirectionEnum value that specifies whether the search should begin on the current row or the next available row in the direction of the search. Its value can be adSearchForward or adSearchBackward. The search stops at the start or end of the recordset, depending on the value of searchDirection.
start An optional Variant bookmark to use as the starting position for the search.
Remarks
The comparison operator in criteria may be ">" (greater than), "<" (less than), "=" (equal), ">=" (greater than or equal), "<=" (less than or equal), "<>" (not equal), or "like" (pattern matching).
The value in criteria may be a string, floating point number, or date. String values are delimited with single quotes (for example, "state = 'WA'"). Date values are delimited with "#" (number sign) marks (for example, "start_date > #7/22/97#").
If the comparison operator is "like", the string value may contain "*" (one or more occurrences of any character) or "_" (one occurrence of any character). (For example, "state like M_*" matches Maine and Massachusetts.)
Find Method
Searches a Recordset for the record that satisfies the specified criteria. If the criteria is met, the recordset position is set on the found record; otherwise, the position is set on the end of the recordset.
Syntax
Find (criteria, SkipRows, searchDirection, start)
Parameters
criteria A String containing a statement that specifies the column name, comparison operator, and value to use in the search.
SkipRows An optional Long value, whose default value is zero, that specifies the offset from the current row or start bookmark to begin the search.
searchDirection An optional SearchDirectionEnum value that specifies whether the search should begin on the current row or the next available row in the direction of the search. Its value can be adSearchForward or adSearchBackward. The search stops at the start or end of the recordset, depending on the value of searchDirection.
start An optional Variant bookmark to use as the starting position for the search.
Remarks
The comparison operator in criteria may be ">" (greater than), "<" (less than), "=" (equal), ">=" (greater than or equal), "<=" (less than or equal), "<>" (not equal), or "like" (pattern matching).
The value in criteria may be a string, floating point number, or date. String values are delimited with single quotes (for example, "state = 'WA'"). Date values are delimited with "#" (number sign) marks (for example, "start_date > #7/22/97#").
If the comparison operator is "like", the string value may contain "*" (one or more occurrences of any character) or "_" (one occurrence of any character). (For example, "state like M_*" matches Maine and Massachusetts.)
阿甘 2003-04-06
Sorry ，没看全程序
使用find方法，当recordset里面存在符合条件（find的第一个参数）的记录的时候
该recordset的pos指针就指向首条符合条件的记录
否则指针就到recordset的结尾，即UserRst.EOF=true
使用find方法，当recordset里面存在符合条件（find的第一个参数）的记录的时候
该recordset的pos指针就指向首条符合条件的记录
否则指针就到recordset的结尾，即UserRst.EOF=true
阿甘 2003-04-06
能得到记录，当然就有该用户存在啦
关键的信息是之前的数据库查询语句(select ……）
关键的信息是之前的数据库查询语句(select ……）
大厂程序员手把手教你如何写简历！！（附简历模板） 简历模板 总结 大家好，我是程序员Carl，毕业先后在腾讯百度工作多年，看过很多社招和校招的简历，这篇文章我来总结一下程序员的简历应该怎么写，有哪些注意事项，还给出了我自己的简历模板，好了，我只能帮到这了。...
❤ 为了帮粉丝完成毕业设计，我发现了一款私活神器！！ 【创作不易，求点赞、求收藏】 一、缘起 不日前，有粉丝找到我，让我帮着做个： 教师管理系统 由于种种借口，我当时把问题交给群友去解决了..... 思来想去，越想越内疚，于是就请教了经常做私活的小伙伴。 必须...
来吧！一文彻底搞定哈希表！ 哈希表是个啥？ 小白： 庆哥，什么是哈希表？这个哈希好熟悉，记得好像有HashMap和HashTable之类的吧，这是一样的嘛？???? 庆哥： 这个哈希确实经常见?...我们看看百科解释吧： 散列表（Hash table，也叫哈...
专升本，学历毁了我的一生！ 今天给大家带来一段访谈录音。 这位小伙伴是08年，专科毕业，后来，专升本。 但因为本科不是统招，在就业和跳槽中屡屡碰壁，...我觉得现在，包括很多人也有这种想法，包括现在的专科生，他们一开始不知道这个东西.
超硬核十万字！全网最全 数据结构 代码，随便秒杀老师/面试官，我说的 请思考一下再往下看 小问题二：长度为n的字符串有多少个子串？多少个子序列？ 一、分析枚举的效率 二、初步优化 问题三：怎么用对称轴向两边扩的方法找到偶回文？（容易操作的） 那么请问，加进去的符号，有什么要求...
阿里云盘帮我扩容了10个T，拿来吧你！ 首先给大家看一张图，在无插移动硬盘的情况下，小资源的电脑 W 盘达到了 16.5T 的空间 其实这是小资源就是借助了今天要分享的神器来实现的，让你的磁盘也可以轻松 10T 以上 话不多说，今日分享： 阿里/天翼/和...
正确的java学习顺序-新手看这里！！！ 今天我结合我的学习路线为大家讲解下最基础的学习路线，真心希望能帮到迷茫的小伙伴。（有很多人给你说过让你好好学习，但是没有人给你说应该怎么好好学习，这篇博客就是关于怎么好好学习的） 1. H5+css3：这个阶段...
完了，我不适合做程序员！ 喜欢用图形界面而不喜欢用命令行的人是不是不适合当程序员？ 我思路不行，是不是不适合做程序员？ 我数学不好，是不是不适合做程序员？...当然需要技巧，有些人就不适合种地，你看陶渊明的诗： ...
看看我每天的工作，你们这些程序员都是辣鸡！ 想入行的程序员可能很好奇：程序员日常的工作都在干啥？你们可以看看我上周二的日报，这是相当典型的一天。一大早上班， 我就看到那些上夜班的家伙们把链表给弄反了！这还了得！我得赶紧把它给翻转...
我的第一本pdf！ 大家好，我是bigsai，第一次将部分文章整理成pdf分享给大家。自己写东西断断续续也不少时间了，也写了不少东西(虽然是偏向小白)，这个其实花费的时间还是比较多的，这次的话主要将数据结构与...
这条命令帮我在一分钟内修改了200台远程服务器密码！ 不存在的，经过大佬指点，也总结了一些特别好的方法，让我免受了加班之苦。好了，下面让我们一起聊聊服务器之间远程交互的一些有趣的遭遇和处理方式，把好的方法分享给大家。 目录 一、遭遇和机遇 二、技术分享 ...
大学四年，看过的优质书籍推荐 今天我就给大家介绍一些我这几年看过的一些自认为优秀的书籍，由于我看的大部分书籍可以说都是通用的，所以如果你有时间的话，还是挺建议看看的，特别是学生。 而且，我还给大家准备好了电子书，文末即可获取，感觉...
黑客零起步——菜鸟必看！ 黑客零起步——菜鸟必看！ 一。《名词介绍》 首先给大家介绍点名词： 1。肉鸡 2。木马 3。病毒 4。后门 5。CRACK 6。漏洞 7。端口 8。权限 好了，下面我来详细介绍下。 1。肉鸡： 不是吃的那种，是...
实现微信自动回复看电影！ 今天，想为大家分享点干货，大家都知道我在运营一个叫【电影来了呀】的微信公众号，很多人都想知道这个是怎么实现的是吧？ 其实真的不难，但是你要学的东西确实非常多的！ 第一：你需要有自己的微信公众号，这个很...
二更！结合我的经验来看：Python到底该怎么学？拿下这些教程如有神助！ 在上周，我发布了一篇关于选择Pyhthon还是选择Java做主语言的一些建议及思考，同时也根据自己的经验，给大家推荐了一些教程，在不到两周的时间里，达到了1.5w+的阅读量，1000+的收藏。 但是不少粉丝也在给我反馈，...
郁闷！我上不了Github了 大家好，我是漫步，抽奖结果在文末哈。这几天很郁闷，因为Github上不了，Ping Github的域名是没问题的，就是电脑网络上不了。总是返回：ERR_CONNECTION_REFUSED...
Android游戏破解 入门级零基础起步学习破解！MT管理器+修改器使用方法 小白看了绝对有用 认真看了多多少少可以学到点东西 大神勿喷 首先，我们要知道破解一个游戏需要分析它的apk，于是我们需要用到MT管理器(因为我是从MT开始的)，这个度娘一下可以...第一步，我建议大家去其他大大的破解教程贴里先看...
一看就懂！Springboot +Shiro +VUE 前后端分离式权限管理系统 前段日子写过一篇关于SpringBoot+Shiro的简单整合的例子，那个例子并不适用于我们目前的前后端分离开发的趋势。我之前写过一个项目也是用到了Shiro的前后端分离，...废话不多说，让我们来看看如何实现吧 前后端分离...
