combo1.width = .colwidth(c)
combo1.text = .text
combo1.visible = true
combo1.setfocus
end if
end with
end sub
private sub msflexgrid1_keypress(keyascii as integer)
if keyascii = vbkeyreturn then
call msflexgrid1_click
end if
