用什么符号代表任意长度的字符串呢
比如说我要输入以1开头的任意长度的字符串或固定长度的字符串，如何表示呢
[解决办法]
If Trim(UserId) = "1*" Then
改成：If Left(UserId,1) = "1" Then
[解决办法]
text1 代表登录时输入编号的文本框
if left(text1.text,1)="1" then '管理员
'数据库中执行管理员权限
Set rs = db.RunSelectSQL("SELECT 部门 FROM 毕设教务管理系统..用户清单 WHERE 用户编号='" + UserId + "' and 部门='系统管理'")
elseif left(text1.text,1)="2" then '老师
Set rs = db.RunSelectSQL("SELECT 部门 FROM 毕设教务管理系统..用户清单 WHERE 用户编号='" + UserId + "' and 部门='老师管理'")
else '学生
Set rs = db.RunSelectSQL("SELECT 部门 FROM 毕设教务管理系统..用户清单 WHERE 用户编号='" + UserId + "' and 部门='学生管理'")
end if
