VB 动态改变组合框列表值
希望VB的组合框Combo的列表内容能根据需要重新动态加载列表的内容,列表的内容跟初始化时的内容不一定相同。在Combo的DropDown事件中加入如下代码Private...
希望VB 的组合框 Combo的列表内容能根据需要重新动态加载列表的内容,列表的内容跟初始化时的内容不一定相同。在Combo的DropDown事件中加入如下代码
Private Sub Combo4_DropDown()
Combo3.Clear '先清空才能后重新赋值
For i = 3 To UpDownFSize.Max
Combo3.AddItem i
Next i
Combo3.Refresh
End Sub
执行了该代码之后,组合框中的列表内容并未发生变化,仍然跟初始化时的列表内容是一样的呀。
怎么才能实现组合框的列表内容重新加载呢?
Private Sub Combo4_DropDown()
Combo4.tag = Combo4.Text
Combo4.Clear
For i = 3 To UpDownFSize.Max
Combo4.AddItem Trim(str(i)), i - 3
Next
Combo4.Refresh
Combo4.Text = Combo4.tag
End Sub
终于自己给调试出来了。但分数不能浪费,第三个提醒了我,给第三个吧。呵呵 展开
Private Sub Combo4_DropDown()
Combo3.Clear '先清空才能后重新赋值
For i = 3 To UpDownFSize.Max
Combo3.AddItem i
Next i
Combo3.Refresh
End Sub
执行了该代码之后,组合框中的列表内容并未发生变化,仍然跟初始化时的列表内容是一样的呀。
怎么才能实现组合框的列表内容重新加载呢?
Private Sub Combo4_DropDown()
Combo4.tag = Combo4.Text
Combo4.Clear
For i = 3 To UpDownFSize.Max
Combo4.AddItem Trim(str(i)), i - 3
Next
Combo4.Refresh
Combo4.Text = Combo4.tag
End Sub
终于自己给调试出来了。但分数不能浪费,第三个提醒了我,给第三个吧。呵呵 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询