表单控件button名称的字符限制

我目前正在编写一套用于项目跟踪的macros。 其中一个macros以编程方式为每个要跟踪的新项目生成表单控件button。 为了允许生成的button使用适当的数据启动表单，我devise了用最less量的数据命名button来访问相应的数据。

我遇到的问题是，如果传递给名称的数据太长，代码错误说： the specified value is out of range 。 我想我只是想出一个替代标识符传递给button，但同时，我很好奇，如果表单控件的名称有一个特定的字符限制，并且如果有提高或改变这个限制的方法？ 如果不是，具体是什么字符限制？

我使用button的名称来存储标识数据，因为我需要一个后来的程序来知道按下button时使用Application.Caller访问哪些数据。 有没有一个替代scheme的button指向特定的数据集？

Answer 1

你可能会搞砸button，并使用一些属性，所以有一个类叫clsCustomButton

 Public WithEvents btnCustomButton As MSForms.CommandButton Private strDataDetail1 As String Private strDataDetail2 As String Private strDataDetail3 As String Public Property Let DATA_DETAIL1(value As String) strDataDetail1 = value End Property Public Property Let DATA_DETAIL2(value As String) strDataDetail2 = value End Property Public Property Let DATA_DETAIL3(value As String) strDataDetail3 = value End Property Public Function INITIALISE(btn As MSForms.CommandButton) Set btnCustomButton = btn End Function Private Sub btnCustomButton_Click() Module1.DATA = strDataDetail1 & "_" & strDataDetail2 & "_" & strDataDetail3 End Sub