[已解决]求助：如何实现

fjmxwrs

打开文件时，如何实现先打开用户窗体，如用户登录，登录成功后才打开文件。谢谢高手写个代码出来参考一下

最佳答案

月排行榜 / 总排行榜

溦兰

2010-2-27 15:19

 先这在写

求助：如何实现

在按下“登录”那个按钮里写入

求助：如何实现

跳转到最佳答案楼层

溦兰

 先这在写

求助：如何实现

在按下“登录”那个按钮里写入

求助：如何实现

zxy999

学习

平地三尺浪

学习了

fjmxwrs

64 textbox1.setfocus 是什么意思？

if mame=....or pw=... then

这两个值如何取一组数？如：A列为用户名，B列为密码，如何对应起来？

好象得if name=...and pw=...then 是吗？

excel03

学学

liupengfy

点击登录 按钮的代码：

Private Sub CommandButton1_Click()
Dim name As String
Dim pw As String
name = ComboBox1.Value
pw = TextBox1.Value
If name <> "lp" Or pw <> "fy" Then
  MsgBox "用户名或密码不正确，请重新输入！", 64
  TextBox1.SetFocus
Else
  MsgBox "用户名及密码正确，请继续！", 64
  Unload UserForm1 '关闭窗体
  Application.Visible = True '显示工作表
End If
End Sub

fjmxwrs

QUOTE:

以下是引用溦兰在2010-2-27 15:19:00的发言：

 先这在写

在按下“登录”那个按钮里写入

在2010版会文件一起出现，如何解决？