主题：自定义用户管理与权限

我按照帮助，设置了，自定义的用户管理与权限

但是想实现，除了管理员，登录用户也可以自己修改密码，但是不能修改别人的密码，因为目前的帮助中的代码，登录人员是可以看到其他人的密码的，也可以修改，如何让用户管理中的 listbox1 中只出现登录人员自己的名字呢？

Dim cmd As New SQLCommand
Dim dt As DataTable
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")
cmd.C
cmd.CommandText = "SELECT DISTINCT Name From {Users}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
lst.Items.Add(dr("Name"))
Next
If Lst.Items.Count > 0 Then
lst.SelectedIndex = 0
End If

这是用户管理窗口中 afterload 中的代码

要如何再增加密码，实现我上面所述功能呢

在林大侠的大力帮助下，终于解决了这个难题，我采用了方法二，真是谢谢啊，再次表示感谢。

可是，还出现了一个问题，就是用了用户自定义权限之后

以管理员名字登录进去，返回系统菜单，仍然不能进行开发相关功能的编辑，菜单设计什么的都不能用了

按住ctrl键已开发者身份登录进去，数据又都没有了，这可怎么办，是什么原因呢？

谁又遇到类似的情况，有高手解决的了的吗？

恩，我基本上都弄完了，就只是权限没有设置，不知道这样会不会受到影响

这样做是可以了，可是普通用户也可以使用系统菜单了，我想实现除了管理员可以见到系统菜单进行设置，其他用户都只能在编辑好的窗口里操作。那么我要加一个判断，就是是否切换到了“开发者”登录模式下？

请问，如何编辑这条代码呢？

本人已解决，按照您说的方法实现了可以数据和设计开发并行的模式，只是有点麻烦，必须从普通用户登录，然后切换到开发者模式登录，但是已经很感谢了，谢谢林大侠