我的图书馆

2.       按钮怎么加：

首先，让我们把昨天做好的图放进窗体，新建一个空白的窗体后，大家放图片吧：

放好之后，在用户名，密码后面，加上两个［文本框］，右侧是这个空白窗体的属性，请大家按这些设置方式进行设置。

然后在下方加上：［进入］［退出］按钮。

方法是，先加普通按钮，在这里点击“取消”，因为按钮的功能是写代码的，我们不用它的引导模式：

好了，接下来把做好的按钮图片放进这个按钮就成了。

下一步，让我们开始写代码吧，我把代码直接贴出来了，愿意的朋友可以直接复制粘贴进你的按钮，就成了。不过你很好学的话，我也希望你好好阅读一下，代码是很有趣的东西，有时我很恨它们，但有时很爱它们。

[进入]按钮的代码：

‘这一段是用来检查有没有输入用户名或密码的

If IsNull(Trim(Me.用户名)) Then

DoCmd.Beep

MsgBox ("请输入用户名称！")

Else

If IsNull(Trim(Me.密码)) Then

DoCmd.Beep

MsgBox ("请输入密码！")

Else

‘以下是用来与［登陆表］做对比的

Me.RecordSource = "select * from 登陆表 where 用户名= '" & Me.用户名 & "' and 密码='" & Me.密码 & "'"

'Set rs = GetRS(str)

If Me.Recordset.EOF Then

DoCmd.Beep

MsgBox ("没有这个用户或密码有误,请重新输入！")

Me.用户名 = ""

Me.密码 = ""

Me.用户名.SetFocus

Exit Sub

Else

DoCmd.Close

‘试用版使用次数的限制

If n = 50 Then

DoCmd.Close

Else

n = n + 1

MsgBox ("欢迎使用承德县干部管理系统！")

check = True                       '设置登陆标志

DoCmd.OpenForm ("主查询窗体")

End If

End If

End If

进入按钮的基本功能是：

（1）       检查用户名或密码是否为空；如果其中的为空，进行友好提示。

（2）       比对登陆表，发现不匹配进行友好提示

（3）       如果一切都OK，提示欢迎，打开主窗体。

按钮的使用需要和对应的表进行匹配，我们在下面一节会做出系统的说明。总之，封面的制作是成套的，你用这个办法，就需要做一系列的事情，才能保证它正常成功地实现你要的效果。

代码看得头痛，如果你是菜鸟，以下这些信息或者对你有些帮助：

DoCmd的各类方法：这是个好东东，它可以指挥计算机做好多事情，docmd.beep是让电脑发出“嘟”的一声，提醒你错了。Docmd.runsql是运行一条SQL语句。反正docmd是指挥家，它可以让窗体打开，让窗体关上，让你头上生出朵花来，反正你如果有空，好好看看它都可以干些什么，如果不想死啃书的话，注意多在找码当中找到它的各类用法，它是盘相当不错的菜，变化很多的。

Me.啥啥啥：ME是指当前窗体，Me.RecordSource意思是当前窗体的记录源，Me.Recordset.EOF这句话的意思是当前记录集为空，Me.用户名.SetFocus是将“用户名”字段设为焦点。

SQL代码里的头痛之处：

"select * from 登陆表 where 用户名= '" & Me.用户名 & "' and 密码='" & Me.密码 & "'"

以上这一段是一句SQL语句，我们常常需要用到，SQL的语法我不多说，但要想让ACCESS里用起来，它与窗体字段的合并是让我十分头痛的一个地方，老是因为多引号，少引号产生错误。Me.用户名是窗体上的一个字段，在与SQL合并的时候，是不能被双引号引用的，所以要在引用它之前，把其它的SQL语句先引起来，就是这一段："select * from 登陆表 where 用户名= '"，在SQL语句里，“AND”是“且”条件的连接词，合并时就不能再用它了，我们用“&”这个符号，在好多查询条件当中，ACCESS认’姓名’，所以单引号也不能缺，大家睁大眼睛，会发现在［用户名= ］后面，有一个小小的单引号吧。所以你在抄人家代码的时候，千万要十分十分地小心，漏掉一点点，你那边也会成不了事儿。虽然天下文章一大抄，但会抄和不会抄，也要拼眼力呀！

［退出］按钮要简单地多，直接退出就可以了，我就不抄代码了。

说到按钮，我有个血的教训，一定得提醒大家一下。一开始，我不是直接放按钮的，而是直接放图片的，因为图片也有“单击”事件，我把漂亮的按钮图片直接嵌进去，认为用“单击”事件，也可以实现一样的效果。但是，开发环境下是可以的，一旦我编译了之后，就不行了。

后来发现用按钮比较保险，只是因为ACCESS的按钮只有方头方脑的这一种，不想自寻烦恼的还是直接找个方头方脑的按钮图片，比较妥当。当然，我属于喜欢自寻烦恼的，所以我做了这个：

大家看见了吧，不按的时候，它是一个圆角的按钮，但一按，难看的方头方脑的黑框线还是会出现，对比之下：

这个东东就显得比较耐看了。