Visual Basic Segment:

VB Code:
  1. With rsTipModels
  2.          Me.Combo_Option_Selection_Tip_Model_Type.Clear
  3.          While Not .EOF
  4.  
  5.             MsgBox .Fields(!MODEL_NUMBER)                       'A) Same Error
  6.             MsgBox .Fields("MODEL_NUMBER").Value              'B) Same Error
  7.             MsgBox .Fields(!MODEL_NUMBER)                       'C) Same Error
  8.             MsgBox .Fields("MODEL_NUMBER").Value              'D) Same Error
  9.             Me.Combo_Option_Selection_Tip_Model_Type _    'E) Same Error
  10.                .AddItem .Fields("MODEL_NUMBER").Value
  11.  
  12.  
  13.             .MoveNext
  14.          Wend
  15.       End With

I thought I had this figured out. Unfortuanaly, I lost the source I was using to figure it out and can't find it again.

Help!
Thanks,