vb+sql server中,textbox中输入的数据如何转换为money类型

lovecjy01 · 发表于 2020-2-8 12:30:01

lava2411 · 发表于 2020-4-1 21:15:01

cdbl(text1.text)

lionel · 发表于 2020-4-2 11:45:01

text1.text= Format(text1.text, "##0.00")

justindx · 发表于 2020-4-2 18:45:01

Format(text1.text, "#,##0.00")

lovecjy01 · 发表于 2020-5-29 23:00:01

各位老大:不行,报错
实时错误'-2147217913(80040e07)'
不允许从数据类型varchar到数据类型money的隐形转换(.......),请使用convert函数来运行此查询

wufuyi · 发表于 2020-6-3 10:30:01

首先,你必须要确定你的文本框中输入的字符串可以正常转换成数值,然后直接按字符串代入到SQL语句中,不需要转换,代入时,可以考虑下面这个办法:
drs.open "select * from 表名 where MoneyField="+cstr(val(text1.text)),yourcn

经过两次VB下的数据转换,是为了把文本框当中的内容转换成确实可以被SQL解释为Money的字符串

wufuyi · 发表于 2020-6-5 23:30:01

mcn.execute "insert into 表名 (Number,Name,Money) values ('00001','"+me.txtName.text+"',"+cstr(val(me.txtMoney.text))+")"

身材正 · 发表于 2020-6-7 00:15:01

dim dec_Money as decimal=0
dec_Money=Cdec(trim$(txtMoney.text))

fenghui1231 · 发表于 2020-7-4 14:30:01

先检查是不是可以转换成数字类型再转换也许是空值之类不能转换
if isnumeric(text1) then
....
end if

thetian · 发表于 2020-7-4 20:30:01

先进行数值转换，才能进行money的格式化啊。

		自动登录	找回密码
密码			立即注册