请教一个制作登陆密码的问题

xnc_0014

各位老师好：
    晚辈请教一个问题，如附件。其中有一个窗口，是制作登陆界面所用，其中用户名“张三”的密码为123456，保存在表“系统用户”中。我打算在窗口中登陆（主截面暂时还没有做），但是总是提示密码错误。我用：“MsgBox com用户” 看了一下，发现选择张三时，com用户的值为1，李四则为2，我不明白这是什么原因，就算是ListBox的Index号，也应该“张三=0”啊，请求大家帮帮我吧，谢谢。

确定按钮的代码：
Private Sub login_ok_Click()
Dim userID As Integer
If IsNull(com用户) = False Then
    If DLookup("[密码]", "系统用户", "[用户名]=""" & com用户 & """") = txt密码 Then
        userID = DLookup("[id]", "系统用户", "[用户名]=""" & com用户 & """")
        DoCmd.Close
        DoCmd.OpenForm "主窗口"
        Form_主窗口.User = userID
    Else
        txt密码 = ""
        txt密码.SetFocus
        MsgBox "密码错误！", vbCritical
    End If
End If
End Sub

lhdcxz

给你一个现成的。 工作簿登录界面—密码=名字.rar (161.56 KB, 下载次数: 512)

2012-3-15 14:05 上传

点击文件名下载附件

ly

原因有2：
1、表之字段名与下列不符

1. userID = DLookup("[id]", "系统用户", "[用户名]=""" & com用户 & """")

复制代码

2、窗体组合框“com用户”的绑定列应该是2

xnc_0014

哦，对了，谢谢楼上两位高手，作为菜鸟请教一下图中的“列数”和“绑定列”分别起什么作用啊？为什么我把列数改为1，就什么也显示不出来？谢谢。

ly

xnc_0014 发表于 2012-3-15 15:57
啊，原来如此。我尝试把列数改为1，列宽改为2.54cm，绑定列为2，却仍然不对，难道说列数非要从第一列开始， ...

1、列数为3，对应的列宽0cm;2.54cm;2.54cm，表示第一列隐藏不现示。绑定列可以是1或2或3，但绝不可以是大于4的数字出现。
2、如果需要第10列的数据，何必前9项宽设置为0。应用SQL方法把有用的数据筛选出来就可以了。

xnc_0014

啊，原来如此。我尝试把列数改为1，列宽改为2.54cm，绑定列为2，却仍然不对，难道说列数非要从第一列开始，难道有10列的话，必须先设置前9个项的宽为0，然后再设置第10列，绑定第10列？

ly

xnc_0014 发表于 2012-3-15 14:21
哦，对了，谢谢楼上两位高手，作为菜鸟请教一下图中的“列数”和“绑定列”分别起什么作用啊？为什么我把列 ...

如果把列数改为1，则列宽不能为0cm

xnc_0014

明白了，谢谢大侠指点

莫悠悠

请教：登陆密码改为可见怎么设置？

sunleiflfl

学习!!!!!!!!!!!!!!!!!!