vb+access添加数据
以下代码：
Private Sub Form_Load()
connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\工作\SQL\fetion.mdb;Persist Security Info=False"
conn.Open connStr
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
End Sub
Private Sub Command1_Click()
rs.Open "Profile", conn, adOpenKeyset, adLockPessimistic
rs.Fields("user_number") = Text1.Text
rs.Fields("user_name") = Text2.Text
rs.Fields("number") = Text3.Text
rs.Fields("user_tel") = Text4.Text
rs.Fields("user_phone") = Text5.Text
rs.Fields("user_address") = Text6.Text
rs.Fields("start_time") = Text7.Text
rs.Fields("end_time") = Text8.Text
rs.Fields("money") = Text9.Text
rs.Fields("contents") = Text10.Text
rs.Update
MsgBox ("录入成功")
End Sub
Private Sub Command3_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
相关问答：
我将一段4000来字的文本赋值给它怎么就出错了,提示运行时错误2176 这个属性的设置值太长?
你是怎样赋值的？
测试了一下，用备注字段给文本框做数据源，没有提示设置值太长,14893字符
引用我将一段4000来字的� ......
有一个数据库里只有2W条数据不到，却有500M那么大,怎么回事啊？是ACCESS的数据库。后来我把ACCESS导入到MSSQL中，也占用了500M左右的空间，如果压缩数据库呢？请高手指点
压缩数据库？能做到么...
期待高人指点 我 ......
为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊？
代码看看
照道理form.show 没次数限定的吧
我也快疯了。
楼主知道怎么发贴么？
引用
我也快疯了。
楼主知道怎么发贴么？
楼主也 ......
DIM ds as new DataSet
我这样声明 怎老是报 用户定义类型未定义？ 这个需要引用什么吗？？
前提是DataSet对象要存在,就是对象浏览器中有它.没有就要引用.
dataset是ADO.NET对象
如果你用的是vb.net，那么在� ......
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
