设置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)

那样有用吗?