Question

关于VB读取数据类型问题

h5.xianshi.Text = h5.xianshi.Text + rs1.Fields("min") + "元" + "-" + rs1.Fields("max") + "元" + " 均价: " + rs1.Fields("jun") + "元 " + rs1.Fields("years") + "年" + rs1.Fields("mons") + "月" + rs1.Fields("days") + "日" + vbCrLf

报告错误 13 类型不匹配
除了rs1.Fields("days")是access数据库里的数字类型，其他都是文本
days 数字 整型 其他默认设置

高手帮帮忙，先谢谢拉
如能解决问题，加分奖励
全文代码请见:
http://zhidao.baidu.com/question/130701977.html

Cstr(rs1.Fields("days")) 试了 显示不全，省去了很多数据，还有其他办法吗？

Answer 1

你的显示数据的代码？

h5.xianshi.Text = h5.xianshi.Text & cstr(rs1.Fields("min")) & "元-" & Cstr(rs1.Fields("max")) & "元 均价: " & rs1.Fields("jun") & "元 " & rs1.Fields("years") & "年" & rs1.Fields("mons") & "月" & Cstr(rs1.Fields("days")) & "日" & vbCrLf
rs1.Fields("days")是access数据库里的数字类型，因此Cstr(rs1.Fields("days"))

Answer 2

... & rs1.Fields("days") & ...

用&代替全部的+号