参考:
http://www.foxtable.com/webhelp/scr/0696.htm
e.form.Controls("Combobox1").Value = cmd.ExecuteScalar()