时间戳

首页 > 解决方案 > 具有多个公共常量变量增量的组合框 additem

excel - 具有多个公共常量变量增量的组合框 additem

问题描述

我正在尝试循环在组合框中添加项目，因为我有很多项目。

我想做这样的事情：

我有带有公共常量（0 到 1024）的 Module1：

Public Const Command0 As String = "1-Enable I/O (1)"  
Public Const Command1 As String = "2-Enable SNMP GET (119)"  
Public Const Command2 As String = "3-Disable I/O (2)"  
Public Const Command3 As String = "4-Disable SNMP GET (219)"
.
.
.

我想将它与 4 个表单一起使用，所以我不想为每个表单剪切和粘贴 1024 .additem（如果可能的话）

我试过这个，但结果是 Command0、Command1、...、Command1024 等：

Dim Str As String    
    For i = 0 To 1024    
    Str = "Command" & i      
    ComboBoxCommand.AddItem Str
    Next

如何在 .additem 之后放置增量变量？

非常感谢，我希望我的英语还可以……这不是我的第一语言 :-)

标签： excelvba

解决方案

谢谢，

在等待答案的同时，我进行了测试，我想我找到了解决方案。

在 Module1 中，我创建了：

Sub PopulateComboBox(ObjetName As Object)
    ObjetName.AddItem "1-Enable I/O (1)"
    ObjetName.AddItem "2-Enable SNMP GET (119)"
    ObjetName.AddItem "3-Disable I/O (2)"
    ObjetName.AddItem "4-Disable SNMP GET (219)"
End Sub

我打电话给 PopulateComboBox。我不知道这是否是更好的解决方案，但它有效:-)

推荐阅读