设置UserFormcombobox的值
(从我的更广泛的问题中缩小在input链接描述在这里 元build议。)
我有一个用户表单。 在那个用户表单上有好几个combobox供年份,月份和dateselect。 根据select年份和月份,每天combobox填充的数字最多为28,29,30或31。 为了避免select像2月31日这样的事情,我想检查选定的date值是否超过了当月的最大值,并适当减less。 目前我已经尝试了这些选项:
If Me.Combo_Day.Value > iMaxDate And iMonthNo > 0 And Not Me.Combo_Day.Value = "" Then Me.Combo_Day.Value = Me.Combo_Day.List(iMaxDate - 1)
和
If Me.Combo_Day.Value > iMaxDate And iMonthNo > 0 And Not Me.Combo_Day.Value = "" Then Me.Combo_Day.Value = iMaxDate
他们都没有工作; 任何时候该行被parsing,我得到一个380错误的解释“无法设置值属性。无效的属性值。
我试过改变.Text
和.Value
,而且都没有太大区别。 如何更改combobox中的选定值?
由于对请求的误解而编辑:
我的错,我误解了原帖。 如果天数是按数字顺序设置的,那么确实可以使用ListIndex
(只记得它从零开始,所以你必须减去1)。 它看起来像:
Me.Combo_Day.ListIndex = (iMaxDate - 1)
那样有用吗?