Can't get combo on form set to 1st row on form open

[GraeagleBill]

The code segment below initializes the three rows of a 2 column combo in the OnOpen Event of a form. The format of the 2 columns is 0";1". I want the combo box to display the default value, the CurYr, when the form opens.



"Me.cboYears.DefaultValue = CurYr" isn't getting the job done.

Once I go through a dropdown action everything works properly, it's just when the form opens that the combo appears blank.

Me.cboYears.RowSource = lngCurYrSun & "," & CurYr & ";" & _
                                    lngCurYrSunMinus1 & "," & CurYr - 1 & ";" & _
                                    lngCurYrSunMinus2 & "," & CurYr - 2
Me.cboYears.DefaultValue = CurYr

[Missinglinq]

Is CurYr set as the Bound Column of the Combobox, or is it lngCurYrSun?

For anything related to data, it is usually best to run it in the Form_Load event, rather than in the Form_Open event; data is frequently not available as early as the open event.

Where/how is CurYr defined?

Also, I assume that the Row Source Type has been set, somewhere, to Value List; is this correct?

All of this aside, to open with the first row selected, on New Records (which is what setting the DefaultValue would accomplish) I'd go with this:

Private Sub Form_Current()
 If Me.NewRecord Then
  cboYears.SetFocus
  cboYears.ListIndex = 0
 End If
End Sub

Linq ;0)>

[GraeagleBill]

BINGO!!

"Is CurYr set as the Bound Column of the Combobox" The recent upgrading of a single column combo to that of two columns failed to include the designation of column "2" as being the bound column. All I had to do was update the property sheet accordingly and all is now functioning properly.

Thanks,
Bill

[Missinglinq]

Glad we could help!

Linq ;0)>