读书人

form初始化时没法生成控件

发布时间: 2013-03-25 15:43:04 作者: rapoo

form初始化时无法生成控件
一个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

[解决办法]
恭喜楼主 jf
[解决办法]
谢谢楼主分享。

读书人网 >VBA

热点推荐