关于UNLOAD----如何彻底退出USERFORM?

andrewyang · 发表于 2009-9-16 22:01

代码1，2为USERORM1中两个按钮对应的代码。
用代码1隐藏USERFROM1,可是其仍然在内存中存在，
本想用"代码2"彻底退出USERFORM1,但是出现错误提示，无法运行。不知如何解决？请高手指点，谢谢！！

代码1：--运行OK
Private Sub CommandButton1_Click()
Me.Hide
End Sub

代码2：---为何此代码不能使用？
Private Sub CommandButton2_Click()
Me.Unload
End Sub

lonero · 发表于 2009-9-16 22:06

改为unload me就可以了，unload不是窗体的方法

andrewyang · 发表于 2009-9-16 22:14

原帖由 lonero 于 2009-9-16 22:06 发表
改为unload me就可以了，unload不是窗体的方法

谢谢你的回复！

不过既然unload不是窗体的方法，却能操作窗体？
还请多赐教赐教为什么。（理论太差了，谢谢！！

）

lb_bn · 发表于 2009-9-16 23:44

就是没有USERFROM1.unload这种用法。

andrewyang · 发表于 2009-9-17 12:21

谢谢谢谢，自己太刨根问底了！

水星钓鱼 · 发表于 2009-12-20 11:05

unload 是statement,是语句，这个语句的作用就是从内存中卸载窗体。当然也就可以操作窗体了。

andrewyang · 发表于 2010-3-17 12:16

原帖由 水星钓鱼 于 2009-12-20 11:05 发表
unload 是statement,是语句，这个语句的作用就是从内存中卸载窗体。当然也就可以操作窗体了。

谢谢高人的指点，明白了！！！

zopey · 发表于 2018-6-26 11:23

Private Sub Confirm_Click()
i = Application.Match([L52], [a70:a100], 0)
If i > 0 Then
If TextBox2.Value = Cells(i + 69, 3).Value Then
   MsgBox "Pass"
   Unload UserForm1
Else
   MsgBox "Wrong Pw"
End If
Else
MsgBox "Wrong User"
UserForm1.Hide
End If
End Sub

Private Sub userform_queryclose(cancel As Integer, closemode As Integer)
If closemode = vbFormControlMenu Then
   cancel = True
End If
End Sub

签名确认.zip (175.95 KB, 下载次数: 93)

		自动登录	找回密码
密码			免费注册

[求助] 关于UNLOAD----如何彻底退出USERFORM?

回复 3楼 andrewyang 的帖子

回复 4楼 lb_bn 的帖子

回复 3楼 andrewyang 的帖子