用户表Users（Access），教工基本信息表（Access），是两个数据库

 用户表Users

此主题相关图片如下：qq截图20190326093307.png

教工基本信息表

此主题相关图片如下：qq截图20190326093429.png

增加用户窗口ComboBox1列出教工基本信息没有添加到的，教工编号为:20190904 的

 如下图

此主题相关图片如下：qq截图20190326094559.png

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:增加用户.rar

enter事件

Dim str = DataTables("users").GetComboListString("name")
e.sender.ComboList = DataTables("教工基本信息").GetComboListString("教工编号", "教工编号 not in (\'" & str.replace("|", "\',\'") & "\')")

老师还有个问题

Select  Name,Group,Password Fr om {Users} Where Group = \'财务\'

这样就不能生成，Group改为其它名称就可以，是什么原因？

改成比如

Select Name, [Group], Password From {Users} Where Group = \'财务\'