使用一个类模块创建多个用户表单对象

时间:2017-07-10 20:12:17

标签: excel vba excel-vba oop

我有一个用户表单(如下所示)My userform

当我按下按钮"添加另一个位置"时,我想添加该列表框的另一行和3个文本框。虽然这很简单,但我还需要那些动态创建的表单控件来拥有自己的事件,它们会相互影响(例如,您在文本框中输入文本,列表框中选择相应的项目)。

我打算使用类模块来创建这些额外的行,但我还不知道vba。

不确定将添加多少行/位置,因此我无法在设计时添加这些行/位置。

这是我到目前为止尝试的(可能非常草率)代码:

     Public WithEvents PositionLB As ListBox
     Public WithEvents SurveyCode As TextBox
     Public WithEvents FunctionCode As TextBox
     Public WithEvents PositionCode As TextBox

     Private Sub PositionLB_Change()
         'Irrelevant to question
     End Sub

     Private Sub PositionCode_Change()
         'Irrelevant to question
     End Sub 

0 个答案:

没有答案