With Thisform Store 3 To .Combo1.RowSourceType,.Combo2.RowSourceType,.Combo3.RowSourceType,.Combo4.RowSourceType = 3 .Combo1.RowSource = "Select name From Customer Into Cursor custtemp1" .Combo2.RowSource = "Select name From Customer Into Cursor custtemp2" .Combo3.RowSource = "Select name From Customer Into Cursor custtemp3" .Combo4.RowSource = "Select name From Customer Into Cursor custtemp4" Endwith