excel VBA ---如何根据用户输入动态更改UserForm属性名称---模板文字

mnemlml8  于 2022-11-18  发布在  其他
关注(0)|答案(1)|浏览(254)

我想根据用户的输入修改**$$$。我知道他们的数据类型不是字符串,所以我不能使用字符串连接(例如“frm_”&“$$”&“.lst_”)或正则表达式将$$替换为不同的名称/变量/字符串。我正在寻找一种类似JavaScript中模板文字的方法(${}**)。VBA中是否有类似的方法?谢谢。

If frm_$$$.lst_$$$_ABCDE.ListCount > 0 Then
      frm_$$$.lbl_$$$_ACE.Caption = "Lorem ipsum: " & frm_$$$*.lst_$$$_ABCDE.ListCount
ElseIf frm_$$$.lst_$$$_ABCDE.ListCount = 0 Then
      frm_$$$.lbl_TH_centercount.Caption = "Lorem ipsumt: 0"
      frm_$$$.cmd_$$$_Save.Enabled = False
      frm_$$$.cmd_$$$_Next.Enabled = False
End If

我希望If/ElseIf条件根据用户的输入从上到下进行更改。
如果用户的输入是ABC,则

If frm_ABC.lst_ABC_ABCDE.ListCount > 0 Then
      frm_ABC.lbl_ABC_ACE.Caption = "Lorem ipsum: " & frm_ABC.lst_ABC_ABCDE.ListCount
ElseIf frm_ABC.lst_ABC_ABCDE.ListCount = 0 Then
      frm_ABC.lbl_TH_centercount.Caption = "Lorem ipsumt: 0"
      frm_ABC.cmd_ABC_Save.Enabled = False
      frm_ABC.cmd_ABC_Next.Enabled = False
End If
qgzx9mmu

qgzx9mmu1#

使用CStr将用户输入转换为字符串怎么样?然后可以定义一个变量作为转换后的用户输入,并使用该变量进行字符串连接。

相关问题