VB+ACESS

Question

rs1.Open "select * from  li   where 前零 >   '" + val(Combo1.Text) + "'   ", cnn, 3, , adCmdText
显示数据类型错误
可是
rs1.Open "select * from  li    where 前零 >   1   ", cnn, 3, , adCmdText是正确的
怎样将combo1.text 中的数据转换？？？

Answer 1

rs1.Open "select * from  li   where 前零 >  "& val(Combo1.Text) &"", cnn, 3, , adCmdText