'" & Trim(Text2.Text) & "'这是获取text2文本框中的内容,应该是字符类型的.我现在想获取money或数字都会报错的,请问我怎么改一下  啊?有没有其他的获取方式?
谢谢大家

sql = "insert newcard(sname,sno,grade,department,moneys,tel) values('" & Trim(Text1.Text) & "','" & Trim(Text2.Text) & "','" & Trim(Text3.Text) & "','" & Trim(Text4.Text) & "','vrchar(8)," & Trim(Text5.Text) & "','" & Trim(Text6.Text) & "')"
  conn.Execute sql

我是想这样做,向sql库中插入文本框中的数据." & Trim(Text5.Text) & "'文本框中填的是金额10元,但是插不进去,只有字符型才可以