1 凡是userform的事件代码的对象名,都必须是userform
- 凡是userform的事件代码的对象名,事件的名称是自动生成的,都必须是userform
-
当写form 触发事件时,每个不同的 userform 都还是要用 userform 这个关键词
-
比如 这句是自动生成的
Private Sub UserForm_Initialize()
2 userform的事件代码的内部,根据需要用 me 或 useformXX
userform的事件代码的内部,根据需要用 me 或 useformXX
- 引用到自己的名称用 me
- 引用到其他userform的用 userformXXX就行
'在本userform的 下级控件上 me 还是指 form
Private Sub CommandButton2_Click()
If MultiPage1.Visible = False Then
Me.Width = 600 '这里me特指form 而不是这个按钮
MultiPage1.Visible = True
CommandButton2.Caption = "Close Pet Shop"
Else
Me.Width = 300
MultiPage1.Visible = False
CommandButton2.Caption = "Open Pet Shop"
End IfEnd Sub
3 其他地方的代码,应该用userformXXX 的具体名称
- 但是代码里其他地方
- 用到某个具体的 userformXXX 对象,用userformXXX具体的名称
Sub startform1()
Load UserForm1
UserForm1.Show
End Sub
Sub startform2()
Load UserForm2
UserForm2.Show
End Sub