本人新手,多谢帮助!问题简单!

Question

VB中把textbox中的字符(例如:20020405)格式
变成日期型的插入数据库(access)

Answer 1

dim str1 as string
str1=text1.text
insert into 表 (日期) Values (#left(str1,4) & "-" & mid(str1,5,2) & "-" & mid(str1,7,2))#)

Answer 2

dim str1 as string
str1=text1.text
str1="#left(str1,4) & "-" & mid(str1,5,2) & "-" & mid(str1,7,2))#"
sql="insert into 表 (日期) Values (" & str1 & ")"
cn.execute sql

Answer 3

你的那法我用了,报的是:"类型不匹配"
rs_add.AddNew
 rs_add.Fields("data") = format(txtdata.Text, "YYYY/MM/DD")
劳你给改一下!

Answer 4

试一下这个：
rs_add.AddNew
 rs_add.Fields("data") = format(txtdata.Text, "YYYY#MM#DD")

Answer 5

txtDate中的Text应该是YYYY-MM-DD的格式，然后用CDate转换