form初始化时无法生成控件

luhui1982 2013-01-30 11:22:10
一个form ,初始的时候无法生成控件,但是,在form上建立一个按钮,点击按钮确可以生成,何解?

代码如下


Private Sub CommandButton1_Click() '这个可行

Set chbox = Me.Controls.Add("Forms.CheckBox.1", " chboxname1", Visible)

With chbox
.Top = 10
.Left = 10
.Height = 10
.Width = 6
End With

End Sub






Private Sub UserForm_Initialize() ’这个不行 ,打开form时,没看到生成任何控件


Set chbox = Me.Controls.Add("Forms.CheckBox.1", " chboxname1", Visible)

With chbox
.Top = 10
.Left = 10
.Height = 10
.Width = 6
End With


End Sub
...全文
115 4 点赞 打赏 收藏 举报
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
mnxm 2013-01-30
恭喜楼主 jf
  • 打赏
  • 举报
回复
luhui1982 2013-01-30
找到答案了,后面要编程true Private Sub UserForm_Initialize() ’这个不行 ,打开form时,没看到生成任何控件 Set chbox = Me.Controls.Add("Forms.CheckBox.1", " chboxname1", true) With chbox .Top = 10 .Left = 10 .Height = 10 .Width = 6 End With End Sub
  • 打赏
  • 举报
回复
luhui1982 2013-01-30
我是win7 +excel2010
  • 打赏
  • 举报
回复
dsd999 2013-01-30
谢谢楼主分享。
  • 打赏
  • 举报
回复
相关推荐
发帖
Office开发/ VBA
加入

5030

社区成员

其他开发语言 Office开发/ VBA
申请成为版主
帖子事件
创建了帖子
2013-01-30 11:22
社区公告
暂无公告