VB Code:
Combo0.Enabled = True Combo13.Enabled = True Combo0.RowSource = "01;02;03;04;05;06;07;08;09;10;11;12;" Combo0.SetFocus Combo0.Text = Format(Now, "mm") Combo13.RowSource = Year(Now) - 1 & ";" & Year(Now) & ";" & Year(Now) + 1 & ";" Combo13.SetFocus Combo13.Text = Year(Now) Display_Report.SetFocus Combo0.Enabled = False Combo13.Enabled = False
There has to be a better way to do this. I want the form to start up with values in the combo boxes but I don't want them to be enables unless the user clicks a different option button.
I had to do the setfocus enable/disable routine just to get it to work... unless there is a better way?!




Reply With Quote