如果是字符试试这样Dim str as stringstr = e.form.Controls("comboBox1").Valuestr = str & "-" & e.form.Controls("TextBox1").ValueTables("表名").Current("列名") = str