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

'" Val(Text5.Text) "'
请问,这种从文本框中获取数字的写法该怎么改?我在运行时是有错误的.

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

sql = "insert  newcard(sname,sno,grade,department,moneys,tel) values('" & Trim(Text1.Text) & "','" & Trim(Text2.Text) & "','" & Trim(Text3.Text) & "','" & Trim$(Text4.Text) & "','convert(money," & Trim(Text5.Text) & ") ','" & Trim$(Text6.Text) & "')"

'convert(money," & Trim(Text5.Text) & ") '库中的newcard表中moneys字段是money类型的
我用了convert函数进行转换,还是报错了,提示我需要用convert函数进行转换.请问我这么写有什么错误吗?谢谢.顺便问一句,大家的金额都是用什么类型?float吗?