请问2个用户怎么打开不同的窗理呀

Private Sub cmdOK_Click()
reUser.MoveFirst
'判断密码
Do While Not reUser.EOF
If reUser.Fields("操作员") = cmbUser.Text Then
Let mm = Trim(reUser.Fields("密码"))
End If
reUser.MoveNext Loop
If Trim(txtMm.Text) = mm Then
Unload Me
MDIForm1.Show
Else
MsgBox "操作员密码错误！", vbExclamation, "提示信息"
txtMm.Text = ""
txtMm.SetFocus
Exit Sub
End If
MDIForm1.SBar1.Panels(1).Text = "当前操作员：" & Czy
有多个用户
想实现超级用户打开1.shuw，普通用户打开2.shuw