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元,但是插不进去,只有字符型才可以