VB 我想请教一下,做VB程序(关于数据库的添加\删除\修改等操作)

VB我想请教一下,做VB程序(关于数据库的添加\删除\修改等操作)是用控件好,还是用代码好呢?为什么呢?谢谢!有加分啊!!!... VB 我想请教一下,做VB程序(关于数据库的添加\删除\修改等操作)是用控件好,还是用代码好呢?为什么呢?谢谢!
有加分啊!!!
展开
 我来答
zdingyun
2006-02-12 · 知道合伙人软件行家
zdingyun
知道合伙人软件行家
采纳数:15429 获赞数:48170
1982年上海业余工业大学化工系毕业 现退休

向TA提问 私信TA
展开全部
建议先使用控件,特别是ADODC数据控件,它与数据库连接方式很多,并支持SQL结构化查询语言,能实现动态查询.但用控件也要写一些代码,以达到应用程序的目的.
数据库用VB6编程语言,对新手而言,如何用好ADODC控件和DATAGRID控件相当重要。具体做法:
新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。
然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,在提供者选项中选MICROSOFT jet 4.0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串,注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本(SQL)编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
SQL查询语言主要结构为:
Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]
查询字段必须分别用(西文)逗号分开或就用一个*号代替,上述查询中排序语句建议最好应用。
SQL查询语言如有错程序运行时告诉你出错,作相应改动即可。本人一般先按上述连接,SQL用"SELECT * FROM TabelName"作调试,无问题,用一个按钮孔件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着,以便放着以后使用。然后删去ADODC1孔件,再添加ADODC1控件再添其他内容。
下给出一段数据连接代码:
Private Sub Form_Load()
Text1 = ""
With Adodc1
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select name from b1 order by name"
Adodc1.Refresh
DataGrid1.Refresh
End With
End Sub
SQL查询语言多写多用就会熟练,以上供提问者参考。
jinglinggg
2006-02-12 · TA获得超过2017个赞
知道大有可为答主
回答量:2421
采纳率:0%
帮助的人:1866万
展开全部
其时两种方法差不多
控件比校简单,也省事
代码的话比校灵活
你看看你的需要了
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
重典技术闲话
2006-02-24 · TA获得超过2173个赞
知道大有可为答主
回答量:2593
采纳率:0%
帮助的人:1136万
展开全部
选添加ADODB控件
Function o_Connection() As ADODB.Connection
Dim Conn
Dim AuthConnectionString As String
Set Conn = CreateObject("ADODB.Connection")
AuthConnectionString = "DBQ=" & App.Path & "\don.mdb;Driver={Microsoft Access Driver (*.mdb)};"
Conn.Open AuthConnectionString
Set o_Connection = Conn
End Function

Function rs_hs(sql As String, Conn As ADODB.Connection) As ADODB.Recordset

If InStr(UCase(sql), "INSERT") > 0 Or InStr(UCase(sql), "DROP") > 0 Or InStr(UCase(sql), "DELETE") > 0 Or InStr(UCase(sql), "CREATE") Then
Conn.Execute sql
Else
Dim rs1 As New ADODB.Recordset
rs1.Open sql, Conn, 3, 3
End If
Set rs_hs1 = rs1
End Function
这是我写的一套数据库打开函数可直接用
至于SQL只要将
"DBQ=don.mdb;Driver={Microsoft Access Driver (*.mdb)};"
改为"Provider=Sqloledb; User ID=sa; Password=; Initial Catalog = abcd; Data Source=(local)"
就OK了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
漏长江北流5008
2006-02-12 · TA获得超过1032个赞
知道小有建树答主
回答量:606
采纳率:0%
帮助的人:0
展开全部
涉及到数据交换方面的程序,当然用写代码的方法比控件更灵活

控件唯一的好处就是简单,因为该写的代码都已经写好了封装好了,你直接输入一些基本参数就可以立即执行各种功能,但灵活性差,如果想处理写特殊效果就要很麻烦。

另外,写代码的话,调试起来也方便,能快速的定位到错误的地方,找出错误,而控件已经规定好了标准代码,如果出错,很难查到具体是什么地方有毛病。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式