'如果是"ComboBox1"控件,用下面的:
'窗口AfterLoade.form.Controls("ComboBox1").value = Today.AddDays(-Today.day+1) '当月第一天e.form.Controls("ComboBox1").value = (Today.Addmonths(1)).adddays(-Today.day) '当月最后一天