vf中如何通过命令按钮给combo增加值

vf中如何通过命令按钮给combo增加值,第1张

您好,我先纠正下您的错误。首先组合框的数据类型是没有表这个选项的。您说的是值吧

那我给您解释下,

首先将combo1的rowsourcetype设置为1-值,然后将combo1的rowsource设置为:1,2,3,4

然后将combo1的style属性的值设置为下拉列表框

然后在命令按钮下面写代码

x=thisform.combo1.listcount

thisform.combo1.list(x+1)=thisform.text1.value

然后执行表单你会看到结果如您所想的实现了。

如需详细演示或解释,加Q:675079855

加Q时声明(百度知道)

使用AddItem 方法为添加选项。

AddItem 方法,用于将项目添加到 ListBox 或 ComboBox 控件,或者将行添加到 MS Flex Grid

控件。不支持命名参数。

AddItem 方法示例代码,选OK增加100个项目到ComboBox控件

Private Sub Form_Click()

    Dim Entry, I, Msg   ' 声明变量。

    Msg = "选OK增加100个项目到ComboBox控件"

    MsgBox Msg   ' 显示信息。

    For I = 1 To 100   ' 计数值从 1 到 100。

        Entry = "Entry " & I   ' 创建输入项。

        Combo1.AddItem Entry   ' 添加该输入项。

    Next I

'    Msg = "选OK删除任一个Entry."

'    MsgBox Msg   ' 显示信息。

'    For I = 1 To 50   ' 确定如何

'        Combo1.RemoveItem I   ' 每隔一项

'    Next I   ' 删除。

'    Msg = "选OK删除全部"

'    MsgBox Msg   ' 显示信息。

'    Combo1.Clear   ' 清除列表框。


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/bake/11595334.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-17
下一篇2023-05-17

发表评论

登录后才能评论

评论列表(0条)

    保存